AddIn wird nicht instaliert
22.04.2015 12:13:34
Peter
ich bitte um Eure Hilfe.
Ich habe ein AddIn erstellt. Dieses Addin befindet sich auf F:/AddIn und es wird beim Start der Datei X installiert.Es befindet sich auch im Projekt-Exporer. Beim Schließen der Datei X wird es wieder deinstalliert.
Bei mir am Arbeitsplatz funktioniert alles bestens. Bei meiner Kollegin am Arbeitsplatz wird das Addin beim Start der Datei X nicht installiert. Damit sind die Makros nicht verfügbar und sie erhält die Meldung: Das Makro kann nicht ausgeführt werden... Laufzeitfehler 1004.
Der Code sie wie folgt aus:
'*******************************************************************
' Makro - Prüfen, ob ein Add-In bereits installiert ist.
' Falls nicht installiert, dann wird es ohne Nachfrage instaliert
'*******************************************************************
Private Sub Workbook_Open()
Dim AddInName1, AddInName2 As String
Dim intAddIn As Integer
Dim AddInInstalliert As Boolean
Dim AddInInstallieren As Boolean
Dim AI As Excel.AddIn
Dim Pfad As String
Application.DisplayAlerts = False 'Abragen ausschalten
Pfad = "F:\AddIn"
AddInName1 = "ADDIN-MAKROS_PEP.xlam"
AddInName2 = Pfad & AddInName1
' Die Namen aller installierten Addins prüfen
For intAddIn = 1 To AddIns.Count
If AddIns(intAddIn).Name = AddInName1 Then
AddInInstalliert = True
Exit For
End If
Next intAddIn
' Addin installieren
On Error Resume Next
Set AI = Application.AddIns.Add(Filename:=AddInName2)
AI.Installed = True
Application.AddIns("ADDIN-MAKROS_PEP").Installed = True
Application.DisplayAlerts = True 'Abragen einschalten
End Sub
'**************************************************************' Addin deinstallieren
'**************************************************************
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If AddIns("ADDIN-MAKROS_PEP").Installed = True Then
Application.AddIns("ADDIN-MAKROS_PEP").Installed = False
Kill AddIns("ADDIN-MAKROS_PEP").FullName
End If
End Sub
Ich denke es ist eine Einstellungs-Sache von Excell. Aber ich weiß nicht mehr welche?
Kann mir jemand hier helfen?
Vielen Dank im voraus!
LG, Peter