Powerpoint Addin - Sub ansprechen

Computer: Software & Programmierung Visual Basic
#1

Hallo leute, ich habe ein großes problem, bei dem ich nicht weiter komme…

Ich habe ein Addin nach Beschreibung der Seite "http://www.office-loesung.de/ftopic17416_0_0_asc.php…. Das funktioniert auch super.

Nur wie kann ich jetzt zum Beispiel beim Start der Bildschirmpräsentation Werte in der TextBox1 des Silde 14 ändern?

 Sub app\_SlideShowNextSlide(ByVal Wn As SlideShowWindow) 

 i = SlideShowWindows(Index:=1).View.Slide.SlideNumber 

 If (i = 1) Then 

 MsgBox "Hallo" 

 Slide14.TextBox1.Value = "Hallo" 

 end if 

 end sub 



 Die MsgBox wird ausgegeben, der Wert in der Textbox ändert sich jedoch nicht. Wie kann ich auf die Textbox zugreifen???? 

 Danke für Eure Antworten.
#2

Ich habe ein Addin nach Beschreibung der Seite
"http://www.office-loesung.de/ftopic17416_0_0_asc.php….
MsgBox „Hallo“
Slide14.TextBox1.Value = „Hallo“

Die MsgBox wird ausgegeben, der Wert in der Textbox ändert
sich jedoch nicht. Wie kann ich auf die Textbox zugreifen???

Hallo Achim,

nimm pre-Tag und nicht prehtml-Tag.

Versuch’s mal so:
Slide14.TextBox1.Text = „Hallo“

Gruß
Reinhard

#3

Hallo Reinhard,

vielen Dank für die Antwort. Hat aber leider nicht funktioniert. Irgendwie habe ich den Eindruck, dass das Addin nicht auf Objekte der geöffneten Präsentation zugreifen kann. Gibt es denn eine Möglichkeit, mit dem Addin ein Sub in der Präsentation aufzurufen? Wenn ich das standartmäßig mache, kommt leider eine Fehlermeldung beim Kompilieren: „Der Visual Basic für Applikationen Code, der mit dieser Präsentation assoziiert ist , kann von PowerPoint nicht kompiliert werden“.
Gruß Achim