Bonjour à tous,
Je voudrai poser une question à la communauté à propos d'une de mes tentatives de codage.
Voilà, j'essaie de faire une boucle for sur des slides pour vérifier leur largeur et leur hauteur cependant, j'ai l'impression que la boucle for bloque la prise en charge des Slides(j)
Je vous laisse regarder :
quand je teste, la condition n'est validée que si le slide est vide ce qui n'est pas normal.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 nbrTitre = 0 For j = 3 To Pres.Slides.Count If ((Pres.Slides(j).Shapes(1).Width = 648) And (Pres.Slides(j).Shapes(1).Height = 90)) Then nbrTitre = nbrTitre + 1 End If Next j
Merci de votre aide !
Partager