On Thu, 01 Dec 2011 16:30:09 +0100, Stefan Dase <
ne...@sooftichwill.de>
wrote:
>Wie kann ich dieses Add-In (*.XLAM) an andere Benutzer verteilen?
Hallo Stefan,
ich habe das bei uns folgendermaßen gemacht (Prinzip):
Es sei
das Add-In: N:\Pfad\MyAddin.xlam
die "Setup"-Datei: S:\Pfad\Setup.xlsm
Auf beide Pfade haben die User zumindest Leserechte.
In Setup.xlsm gibt es eine Schaltfläche, die folgendes "Setup"-Makro
aufruft:
Sub Install_AddIn()
For i = 1 To AddIns.Count
If AddIns(i).Name = "MyAddIn.xlam" And _
AddIns(i).Installed = True Then
MsgBox "AddIn bereits installiert."
ThisWorkbook.Close SaveChanges:=False
Exit Sub
End If
Next i
'Falls AddIn noch nicht installiert
AddIns.Add Filename:="N:\Pfad\MyAddin.xlam", _
CopyFile:=False
AddIns("MyAddIn").Installed = True
MsgBox "MyAddIn erfolgreich installiert."
ThisWorkbook.Close SaveChanges:=False
End Sub
Zusätzlich prüft die Sub bei uns noch, ob der User auch XL2010
installiert hat, und protokolliert, welche User das Add-In installiert
haben.
Um das Add-In zu bekommen, muss jeder User nur einmal die Setup-Datei
öffnen und die Schaltfläche klicken. Das Add-In liegt nur 1x im Netz,
Updates sind ohne besonderes "Ausrollen" möglich.
Gruß
Jörg
--
LPs auf CD brennen - so geht's:
http://www.joergei.de/
E-Mail-Adresse existiert, wird aber nicht gelesen.