Applies ToExcel 2016 za Mac

Poslednji put ažurirano: 10. april, 2019.

PROBLEM

Novi Visual Basic Editor uveden je oktobra 2017. godine u programu Excel za Mac. U tom novom VB uređivaču postoji problem prilikom pravljenja deklaracija objekta izborom iz padajućeg menija na vrhu prozora koda.

Ako kliknete na padajući meni sa leve strane i odaberete stavku sa liste, trebalo bi da dobijete neki kôd za izabrani događaj na padajućoj listi sa desne strane. Možete da napravite dodatne izbore sa padajuće liste na desnoj strani da biste napravili dodatni kôd za rukovanje odabrani događajem.

VBE uređivač prikazuje padajuću listu za izbor objekta

Umesto toga nailazite na grešku da kôd nije napravljen.

Greška programa Microsoft Visual Basic: Promenljiva koristi tip automatizacije koji nije podržan u programu Visual Basic.

STATUS: PRIVREMENO REŠENJE

Odaberite jedno od ovih privremenih rešenja za ovaj problem:

PRIVREMENO REŠENJE #1

Sličan korak možete da izvršite na računaru koji koristi Excel za Windows, a zatim da kopirate kôd u Excel za Mac.

PRIVREMENO REŠENJE #2

Možete da odete na sajt MSDN, pronađete sintaksu za događaj koji želite da koristite i otkucate kôd ručno u VBA projekat. U ovom članku opisani su događaji Microsoft Excel „radne sveske“ – Događaji radne sveske.

PRIVREMENO REŠENJE #3

Kopirajte odgovarajući kôd događaja iz dolenavedenih uzoraka i nalepite ga u VBA projekat. Za svaki događaj obavezno kopirajte kôd od „Private Sub...“ do „End Sub“, uključujući oba.

Privatna sub Workbook_Activate () Kraj podmornice

Privatna sub Workbook_AddinInstall () Kraj podmornice

Privatna sub Workbook_AddinUninstall () Kraj podmornice

Privatna sub Workbook_AfterRemoteChange () Kraj podmornice

Privatna podmorska Workbook_AfterSave podmornica (Bval uspjeh kao Boolean) Kraj podmornice

Privatna sub Workbook_BeforeClose (Otkazivanje kao Boolean) Kraj podmornice

Privatna sub Workbook_BeforePrint (Otkazivanje kao Boolean) Kraj podmornice

Privatna sub Workbook_BeforeRemoteChange () Kraj podmornice

Privatna sub Workbook_BeforeSave (ByVal SaveAsUI as Bulean, Otkaži kao Boolean) Kraj podmornice

Privatna sub Workbook_Deactivate () Kraj podmornice

Privatna sub Workbook_NewChart (ByVal CH kao grafikon) Kraj podmornice

Privatni Workbook_NewSheet Kraj podmornice

Privatna sub Workbook_Open () Kraj podmornice

Privatna podmorska Workbook_PivotTableCloseConnection podmornica (ciljni naslov kao izvedena tabela) Kraj podmornice

Privatna podmorska Workbook_PivotTableOpenConnection podmornica (ciljni naslov kao izvedena tabela) Kraj podmornice

Privatna sub Workbook_RowsetComplete (ByVal opis kao String, ByVal funkcija Sheet kao String, Bval uspešna kao Boolean ) Kraj podmornice

Privatni Workbook_SheetActivate Kraj podmornice

Privatni Workbook_SheetBeforeDelete Kraj podmornice

Privatna podmorska Workbook_SheetBeforeDoubleClick podmornica (ByVal Sh as kao objekat, ByVal Target kao Range, Otkaži kao Boolean) Kraj podmornice

Privatna podmorska Workbook_SheetBeforeRightClick podmornica (ByVal Sh as kao objekat, ByVal Target kao Range, Otkaži kao Boolean) Kraj podmornice

Privatni Workbook_SheetCalculate Kraj podmornice

Privatna podmorska Workbook_SheetChange podmornica (ByVal Sh kao objekat, Bby Target kao opseg) Kraj podmornice

Privatni Workbook_SheetDeactivate Kraj podmornice

Privatna sub Workbook_SheetFollowHyperlink (ByVal Sh kao objekat, Bby Target kao hiperveza) Kraj podmornice

Privatna sub Workbook_SheetPivotTableAfterValueChange (ByVal Sh as kao izvedena tabela, ByVal Targetizvedena za izvedene tabele, ByVal TargetRange kao opseg) Kraj podmornice

Privatna sub Workbook_SheetPivotTableBeforeAllocateChanges (ByVal Sh as kao izvedena tabela, ByVal Targetizvedena za izvedenu tabelu, Ball ValueChangeStart koliko je vremena moguće otkazati kao Boolean) Kraj podmornice

Privatna sub Workbook_SheetPivotTableBeforeCommitChanges (ByVal Sh as kao izvedena tabela, ByVal Targetizvedena za izvedenu tabelu, Ball ValueChangeStart koliko je vremena moguće otkazati kao Boolean) Kraj podmornice

Privatna sub Workbook_SheetPivotTableBeforeDiscardChanges (ByVal Sh as kao izvedena tabela, ByVal Targetizvedena za izvedenu tabelu, Ball ValueChangeStart koliko je vremena moguće Kraj podmornice

Privatni Workbook_SheetPivotTableChangeSync za privatnu podmornicu (ByVal Sh kao objekat, Bby Target za izvedena tabela) Kraj podmornice

Privatni Workbook_SheetPivotTableUpdate za privatnu podmornicu (ByVal Sh kao objekat, Bby Target za izvedena tabela) Kraj podmornice

Privatna podmorska Workbook_SheetSelectionChange podmornica (ByVal Sh kao objekat, Bby Target kao opseg) Kraj podmornice

Privatna podmorska Workbook_SheetTableUpdate podmornica (ByVal Sh kao objekat, Bby Target kao Podobjekat) Kraj podmornice

Privatna sub Workbook_Sync (ByVal SyncEventType kao Office. MsoSyncEventType) Kraj podmornice

Privatni Workbook_WindowActivate Kraj podmornice

Privatni Workbook_WindowDeactivate Kraj podmornice

Privatni Workbook_WindowResize Kraj podmornice

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

Još resursa

Ikona – stručnjaci (mozak, zupčanik)

Pitajte stručnjake

Povežite se sa stručnjacima, razgovarajte o najnovijim vestima za Excel, ispravkama i najboljim praksama i čitajte naš blog.

Excel tehnička zajednica

Ikona Zajednica

Pronalaženje pomoći u zajednici

Postavite pitanje i dobijte rešenja od agenata za podršku, MVP-ova, inženjera i drugih korisnika programa Excel.

Excel Forum na sajtu Answers

Ikona – zahtev funkcije (sijalica, ideja)

Predložite novu funkciju

Volimo da čitamo vaše predloge i povratne informacije! Podelite svoje razmišljanje sa nama. Slušamo.

Davanje povratnih informacija

Takođe pogledajte

Popravke ili zaobilazna rešenja za nedavne probleme u programu Excel za Mac

Da li vam je potrebna dodatna pomoć?

Želite još opcija?

Istražite pogodnosti pretplate, pregledajte kurseve za obuku, saznajte kako da obezbedite uređaj i još mnogo toga.

Zajednice vam pomažu da postavljate pitanja i odgovarate na pitanja, dajete povratne informacije i čujete mišljenje od stručnjaka sa bogatim znanjem.

Pronađite rešenja za uobičajene probleme ili potražite pomoć od agenta za podršku.