Hallo zusammen
ich habe für Powerpoint ein Add In erstellt, welches mithilfe einer Toolbar verschiedene Makros ausführt.
Dasselbe Add-In soll nun auch für Word möglich sein; ich habe das Makro abgespeichert als Word-Vorlage jedoch wird überhaupt nichts gemacht, also keine Toolbar oder ähnliches erstellt.
So sieht der Anfang des Powerpoint Add In´s aus
Sub Auto_Open()
Dim oToolbar As CommandBar
Dim oButton1 As CommandBarButton
Dim MyToolbar As String
Dim cbrCmdBar As CommandBar
Dim strCBarName As String
MyToolbar = "Test"
Set oToolbar = CommandBars.Add(Name:=MyToolbar, _
Position:=msoBarFloating, Temporary:=True)
Set oButton1 = oToolbar.Controls.Add(Type:=msoControlButton)
With oButton1
usw.
Weiss jemand wie man in Word eine Toolbar mit verschiedenen Button erstellt?
Gruss
|