Applies ToExcel 2016 for Mac

Viimati värskendatud 10. aprillil 2019

PROBLEEM

2017. aasta oktoobrist töötab rakenduses Excel for Mac uus Visual Basic Editor. Uus VB-redaktoris esineb tõrge, kui luua objektideklaratsioone, tehes valikuid koodiakna ülaservas asuvas rippmenüüs.

Kui klõpsate vasakule jäävat rippmenüüd ja valite loendist mõne üksuse, peaks valitud sündmuse jaoks loodama paremale jäävas ripploendis kood. Saate paremale jäävas ripploendis teha valitud sündmuse jaoks täiendava koodi loomiseks täiendavaid valikuid.

VBE-redaktoris kuvatakse objekti valimise ripploend

Selle asemel kuvatakse tõrketeade ja koodi ei looda.

Microsoft Visual Basicu tõrge: Visual Basic ei toeta muutuja kasutamist ega automatiseerimistüüpi.

OLEK: AJUTINE LAHENDUS

Valige üks järgmistest ajutistest lahendustest.

AJUTINE LAHENDUS 1

Tehke toimingud arvutis, kus töötab Windowsi jaoks ette nähtud Excel ja seejärel kopeerige kood Excel for Maci.

AJUTINE LAHENDUS 2

Saate liikuda MSDN-i, otsida üles soovitud sündmuse süntaksi ja tippida koodi VBA-projekti käsitsi. Microsoft Exceli töövihikusündmusi kirjeldatakse artiklis Töövihikusündmused (inglise keeles).

AJUTINE LAHENDUS 3

Kopeerige sobiv sündmusekood allolevatest näidetest ja kleepige see oma VBA-projekti. Iga sündmuse puhul kopeerige vahemik „Private Sub..“ kuni „End Sub“ (kaasa arvatud).

Privaatne sub Workbook_Activate () Lõpeta sub

Privaatne sub Workbook_AddinInstall () Lõpeta sub

Privaatne sub Workbook_AddinUninstall () Lõpeta sub

Privaatne sub Workbook_AfterRemoteChange () Lõpeta sub

Private sub Workbook_AfterSave (ByVal edu Boolean) Lõpeta sub

Privaatne sub Workbook_BeforeClose (Tühista kui Boolean) Lõpeta sub

Privaatne sub Workbook_BeforePrint (Tühista kui Boolean) Lõpeta sub

Privaatne sub Workbook_BeforeRemoteChange () Lõpeta sub

Privaatsed sub Workbook_BeforeSave (ByVal SaveAsUI nagu Boolean; Tühista kui Boolean ) Lõpeta sub

Privaatne sub Workbook_Deactivate () Lõpeta sub

Privaatne sub Workbook_NewChart (ByVal CH diagrammina) Lõpeta sub

Privaatsed sub Workbook_NewSheet (ByVal sh objekt) Lõpeta sub

Privaatne sub Workbook_Open () Lõpeta sub

Privaatne sub Workbook_PivotTableCloseConnection (ByVal sihtmärk PivotTable-liigendtabelina) Lõpeta sub

Privaatne sub Workbook_PivotTableOpenConnection (ByVal sihtmärk PivotTable-liigendtabelina) Lõpeta sub

Private sub Workbook_RowsetComplete (ByVal kirjeldus stringina, ByVal leht stringina, ByVal edu kui Boolean) Lõpeta sub

Privaatsed sub Workbook_SheetActivate (ByVal sh objekt) Lõpeta sub

Privaatsed sub Workbook_SheetBeforeDelete (ByVal sh objekt) Lõpeta sub

Privaatsed sub Workbook_SheetBeforeDoubleClick (ByVal sh objekt, ByVal, nupp "Tühista") Lõpeta sub

Privaatsed sub Workbook_SheetBeforeRightClick (ByVal sh objekt, ByVal, nupp "Tühista") Lõpeta sub

Privaatsed sub Workbook_SheetCalculate (ByVal sh objekt) Lõpeta sub

Privaatsed sub Workbook_SheetChange (ByVal sh objekt, ByVal Target vahemikuna) Lõpeta sub

Privaatsed sub Workbook_SheetDeactivate (ByVal sh objekt) Lõpeta sub

Privaatsed sub Workbook_SheetFollowHyperlink (ByVal sh objekt, ByVal sihtmärk hüperlingina) Lõpeta sub

Privaatsed sub Workbook_SheetPivotTableAfterValueChange (ByVal sh objekt, ByVal TargetPivotTable kui PivotTable-liigendtabel, ByVal TargetRange vahemikuna) Lõpeta sub

Private sub Workbook_SheetPivotTableBeforeAllocateChanges (ByVal sh objekt, ByVal TargetPivotTable kui PivotTable-liigendtabel, ByVal ValueChangeStart nii pikk, ByVal ValueChangeEnd kui pikk, tühistage kui Boolean) Lõpeta sub

Private sub Workbook_SheetPivotTableBeforeCommitChanges (ByVal sh objekt, ByVal TargetPivotTable kui PivotTable-liigendtabel, ByVal ValueChangeStart nii pikk, ByVal ValueChangeEnd kui pikk, tühistage kui Boolean) Lõpeta sub

Private sub Workbook_SheetPivotTableBeforeDiscardChanges (ByVal sh objekt, ByVal TargetPivotTable kui PivotTable-liigendtabel, ByVal ValueChangeStart nii pikk, ByVal ValueChangeEnd kui pikk ) Lõpeta sub

Privaatsed sub Workbook_SheetPivotTableChangeSync (ByVal sh objekt, ByVal; PivotTable-liigendtabelina) Lõpeta sub

Privaatsed sub Workbook_SheetPivotTableUpdate (ByVal sh objekt, ByVal; PivotTable-liigendtabelina) Lõpeta sub

Privaatsed sub Workbook_SheetSelectionChange (ByVal sh objekt, ByVal Target vahemikuna) Lõpeta sub

Private sub Workbook_SheetTableUpdate (ByVal sh objekt, ByVal Target AS TableObject) Lõpeta sub

Private sub Workbook_Sync (ByVal SyncEventType AS Office. MsoSyncEventType) Lõpeta sub

Private sub Workbook_WindowActivate (ByVal WN AS Window) Lõpeta sub

Private sub Workbook_WindowDeactivate (ByVal WN AS Window) Lõpeta sub

Private sub Workbook_WindowResize (ByVal WN AS Window) Lõpeta sub

Private Sub Worksheet_Activate()

End Sub

Private Sub Worksheet_BeforeDelete()

End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

End Sub

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

End Sub

Private Sub Worksheet_Calculate()

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

Private Sub Worksheet_Deactivate()

End Sub

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

End Sub

Private Sub Worksheet_LensGalleryRenderComplete()

End Sub

Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable, ByVal TargetRange As Range)

End Sub

Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long, Cancel As Boolean)

End Sub

Private Sub Worksheet_PivotTableBeforeCommitChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long, Cancel As Boolean)

End Sub

Private Sub Worksheet_PivotTableBeforeDiscardChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long)

End Sub

Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)

End Sub

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

Private Sub Worksheet_TableUpdate(ByVal Target As TableObject)

End Sub

Veel ressursse

Ekspertide ikoon (aju, mutrid)

Küsige nõu asjatundjatelt

Saate ühendust võtta asjatundjatega, arutleda Exceli uudiste, värskenduste ja parimate kasutuskogemuste teemal ning lugeda meie ajaveebi.

Exceli spetsialistide kogukonnafoorum

Kogukonnafoorumi ikoon

Abi kogukonnafoorumist

Saate esitada küsimusi ning leida probleemidele lahendusi tugitöötajate, tippspetsialistide, tehnikute ja teiste Exceli kasutajate abil.

Exceli foorum Answersi saidil

Funktsioonitaotluse ikoon (lambipirn, idee)

Uue funktsiooni soovitamine

Meil on alati hea meel teie soovituste ja tagasiside üle! Jagage oma ideid. Me kuulame.

Tagasiside andmine

Lisateave

Excel for Maci viimaste väljaannete parandused või ajutised lahendused

Kas vajate veel abi?

Kas soovite rohkem valikuvariante?

Siin saate tutvuda tellimusega kaasnevate eelistega, sirvida koolituskursusi, õppida seadet kaitsma ja teha veel palju muud.

Kogukonnad aitavad teil küsimusi esitada ja neile vastuseid saada, anda tagasisidet ja saada nõu rikkalike teadmistega asjatundjatelt.

Leidke lahendused levinud probleemidele või võtke ühendust klienditeenindajaga.