FAQ PowerPoint

FAQ PowerPointConsultez toutes les FAQ
Nombre d'auteurs : 20, nombre de questions : 150, dernière mise à jour : 10 juillet 2021
Sommaire→Macros, VBA et fonctions avancées→PowerPoint et les autres applications Officevba
Sélectionnez
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
'J'initialise mes variables
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("D:\Documents\PERSO\truc.xls")
xlApp.Visible = True
xlBook.Sheets("Feuil1").SelectCréé le 31 octobre 2007 par bidou
vba
Sélectionnez
Sub Liaisons()
For Each sld In ActivePresentation.Slides
For Each Forme In sld.Shapes
If Forme.Type = msoLinkedOLEObject Then
Forme.LinkFormat.AutoUpdate = ppUpdateOptionManual
End If
Next
Next
End SubCréé le 10 octobre 2007 par annedeblois



