Developpez.com

Club des développeurs et IT pro
Plus de 4 millions de visiteurs uniques par mois

FAQ PowerPointConsultez toutes les FAQ

Nombre d'auteurs : 20, nombre de questions : 150, dernière mise à jour : 30 mars 2017 

 
OuvrirSommaireMacros, VBA et fonctions avancéesPowerPoint et les autres applications Office
vba
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").Select 
Créé 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 Sub
Créé le 10 octobre 2007  par annedeblois
  

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2009 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.