Publisher 2003 Macro 01 Redimensionnement
Fermé
wfw
Messages postés
16
Date d'inscription
samedi 15 mai 2010
Statut
Membre
Dernière intervention
10 décembre 2010
-
4 juil. 2010 à 14:35
Mytå Messages postés 2969 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 - 5 juil. 2010 à 00:10
Mytå Messages postés 2969 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 - 5 juil. 2010 à 00:10
A voir également:
- Publisher 2003 Macro 01 Redimensionnement
- Publisher gratuit - Télécharger - Outils professionnels
- Macro logiciel - Télécharger - Organisation
- Macro recorder - Télécharger - Confidentialité
- Df-dferh-01 ✓ - Forum Samsung
- Macro Recorder - Télécharger - Divers Utilitaires
1 réponse
Mytå
Messages postés
2969
Date d'inscription
mardi 20 janvier 2009
Statut
Contributeur
Dernière intervention
20 décembre 2016
929
5 juil. 2010 à 00:10
5 juil. 2010 à 00:10
Salut le forum
Pour redimmensionner la largeur à 21 cm de tous les photos des pages.
Mytå
Pour redimmensionner la largeur à 21 cm de tous les photos des pages.
Sub UpdateImage()
Dim pbPage As Page
Dim pbShape As Shape
For Each pbPage In ActiveDocument.Pages
For Each pbShape In pbPage.Shapes
If pbShape.Type = 13 Then
pbShape.Width = "21 cm"
End If
Next pbShape
Next pbPage
End Sub
Mytå