Discussion :

[nsr88]

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 :

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

quand je teste, la condition n'est validée que si le slide est vide ce qui n'est pas normal.

Merci de votre aide !

[clementmarcotte]

Bonjour,

Mon heure gratuite d'Internet est presque terminée. En principe les shapes sont des objets dans la diapositive. Tu ne dois probablement pas chercher la taille des shapes, mais la taille des slides.

[Invité]

Bonjour

Un gros mélange, car les slides ont toutes la même taille.

Philippe

[nsr88]

Je cherchais bien a tester la taille des shapes.
Si mon algorithme ne fonctionnait pas c'est parceque PPT change lui même la taille des shapes dès qu'on fait de la mise en page (même sans ajouter de texte) et je ne l'avais pas vu. C'est pourquoi la condition n'était jamais vérifiée