vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest niedziela, 12 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

Instalowanie dodatku dodatkiem


otwartyotwarty rozpoczął: grzegorz0379 postów: 5



napisał: admin
postów: 613


umieszczony:
23 marca 2012
10:17

  
No, ale jak nie masz zandego arkusza otwartego, to skad bedzie tu ThisWorkbook?
Nie rozumiem...

Cytat:
Można jeszcze na chwilkę zmienić własność is addin.

Thisworkbook.isaddin = False

......


Thisworkbook.isaddin = True
napisał: grzegorz0379
postów: 76


umieszczony:
23 marca 2012
10:13

  
Można jeszcze na chwilkę zmienić własność is addin.

Thisworkbook.isaddin = False

......


Thisworkbook.isaddin = True
napisał: grzegorz0379
postów: 76


umieszczony:
27 lutego 2012
12:51

  
Serdeczne dzieki.
napisał: admin
postów: 613


umieszczony:
27 lutego 2012
12:21

edytowany:
27 lutego 2012
14:01

  
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

napisał: grzegorz0379
postów: 76


umieszczony:
24 lutego 2012
11:10

  
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


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z