Klasse AddIn - Add-In (PowerPoint VBA)
Die Klasse AddIn stellt ein einzelnes Add-In dar, das entweder geladen oder nicht geladen ist.
Um eine AddIn -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim adi as AddIn
Set adi = AddIns(Index:=1)
Die folgenden Prozeduren können zum Festlegen der AddIn Klassenvariablen verwendet werden : AddIns.Add und AddIns.Item.
AutoLoad
Bestimmt, ob das angegebene Add-In bei jedem Start von PowerPoint automatisch geladen wird. Lese-/Schreibzugriff.
Durch Festlegen dieser Eigenschaft auf msoTrue wird die registrierte Eigenschaft automatisch auf msoTruefestgelegt. Der Wert der Eigenschaft "Auto╢Rate" kann einer der folgenden MsoTriState -Konstanten sein.
AddIns(1).AutoLoad = msoTrue
FullName
Gibt den Namen des angegebenen Add-Ins oder der gespeicherten Präsentation zurück, einschließlich des Pfads, des aktuellen Dateisystemtrennzeichens und der Dateinamenerweiterung. Schreibgeschützt.
Diese Eigenschaft entspricht der path -Eigenschaft, gefolgt vom aktuellen Dateisystem Trennzeichen, gefolgt von der Name -Eigenschaft.
Dim strFullName As String
strFullName = AddIns(1).FullName
Loaded
Bestimmt, ob das angegebene Add-In geladen wird. Lese-/Schreibzugriff.
Der Wert der Loaded -Eigenschaft kann einer der folgenden MsoTriState -Konstanten sein.
Addins.Add("c:\my documents\mytools.ppa").Loaded = msoTrue
Name
Der Name (Titel) des Add-Ins für registrierte Dateitypen. Schreibgeschützt.
Sie können den Namen des Objekts in Verbindung mit der Item -Methode verwenden, um einen Verweis auf das Objekt zurückzugeben, wenn die Item -Methode für die Auflistung, die das Objekt enthält, ein Variant -Argument verwendet. Wenn beispielsweise der Wert der Name -Eigenschaft für eine Form das Rechteck 2 ist, .Shapes("Rectangle 2") wird ein Verweis auf diese Form zurückgegeben.
Dim strName As String
strName = AddIns(1).Name
Path
Gibt eine Zeichenfolge, die den Pfad zu dem angegebenen AddIn -Objekt darstellt. Schreibgeschützt.
Der Pfad enthalten nicht den abschließenden umgekehrten Schrägstrich () oder den Namen des angegebenen Objekts.
Dim strPath As String
strPath = AddIns(1).Path
Registered
Bestimmt, ob das angegebene Add-In in die Windows-Registrierung eingetragen wird. Lese-/Schreibzugriff.
Der Wert der registered -Eigenschaft kann einer der folgenden MsoTriState -Konstanten sein.
Application.Addins("MyTools").Registered = msoTrue