Slides darf nicht festgelegt sein sondern muss die aktuelle sein auf der sich der Button befindet. Das Textfeld existiert schon und ich kann es nicht ansprechen. Ich will kein neues generieren, sondern ein schon vorhandenes beschreiben, bzw. auslesen.
Mit diesem Code kannst Du die aktuelle Folie bestimmen:
Visual Basic-Quellcode
Set Folie = ActivePresentation.Slides(ActiveWindow.Selection.SlideRange.Item(1).SlideIndex)
NB. Es ist doch schön, wenn man lesbare Namen vergibt. Siehe auch [VB.NET] Beispiele für guten und schlechten Code (Stil).