Problem polega na tym, ze zeby zaladowac dodatek musisz miec w Excelu otwarty jakis plik.
W momencie, gdy probujesz zaladowac dodatek z poziomu makra umieszczonego w normalnym skoroszycie wszysto sie udaje, bo masz otwarty zwykly skoroszyt.
Jesli to samo robisz z poziomu dodatku i nie masz otwartego zadnego innego skoroszytu pojawi sie blad.
sprobuj ponizszy kod:
Sub ddd()
Dim oWbk As Workbook
Set oWbk = Workbooks.Add
Application.AddIns.Add("C:\Users\Andrzej.BRUEGGENGMBH\Desktop\dod1.xla").Installed = True
oWbk.Close False
Set oWbk = Nothing
End Sub
pozdrawiam
admin
Cytat:Witam,
Proszę o pomoc w rozwiązaniu problemu.
Mam dodatek w określonej lokalizacji. Chciałbym go dodać i zainstalować za pomocą kodu znajdującego się w innym dodatku. Mam taką procedurę:
Sub ddd()
Application.AddIns.Add("C:\Documents and Settings\GrzegorzL\Pulpit\dodatekpróba.xla").Installed = True
End Sub
I wyskakuje błąd. Co dziwne, ta sama procedura z poziomu akrusza działa poprawnie. Po zapisaniu arkusza jako dodatek przestaje działać.
W czym jest problem?
Pozdrawiam
|