Insertar texto en una diapositiva de una presentación power point
Estoy haciendo una aplicación que usa Access y Power Point
Quiero insertar texto en una diapositiva en concreto, por ejemplo la 3
Las instrucciones que hago desde Access son:
Dim ppPres As PowerPoint.Application
ppPres.ActiveWindow.View.GotoSlide 3
ppPres.ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Select
With ActiveWindow.Selection.TextRange
.Text = "Pagina Principal"
End With
Me da el siguiente error -2147188160 Selection (Uknown member) Invalid request Nothing appropiate is currently selected
¿alguien sabe como solucionarlo?
Quiero insertar texto en una diapositiva en concreto, por ejemplo la 3
Las instrucciones que hago desde Access son:
Dim ppPres As PowerPoint.Application
ppPres.ActiveWindow.View.GotoSlide 3
ppPres.ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Select
With ActiveWindow.Selection.TextRange
.Text = "Pagina Principal"
End With
Me da el siguiente error -2147188160 Selection (Uknown member) Invalid request Nothing appropiate is currently selected
¿alguien sabe como solucionarlo?
