Excel VBA : connaitre le nombre de page(s) avant impression

cs_GTY Messages postés 10 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 6 décembre 2007 - 20 févr. 2003 à 10:04
cs_marcelin Messages postés 181 Date d'inscription lundi 3 février 2003 Statut Membre Dernière intervention 22 décembre 2016 - 20 févr. 2003 à 10:44
Bonjour,

Je fais des pages excel au moyen de Vb, mais avant d'imprimer je vroudrais connaitre le nombre de pages que mon document contient.

Merçi à tous.
Greg.

3 réponses

cs_marcelin Messages postés 181 Date d'inscription lundi 3 février 2003 Statut Membre Dernière intervention 22 décembre 2016
20 févr. 2003 à 10:14
worksheet.count

ou tufais un boucle avec un conteur

for each.worksheet
next

voila

a+

marcelin
0
cs_GTY Messages postés 10 Date d'inscription jeudi 6 juin 2002 Statut Membre Dernière intervention 6 décembre 2007
20 févr. 2003 à 10:21
Ce n'est pas le nombre de feuilles que je veux, mais le nombre pages dans une des feuilles.
0
cs_marcelin Messages postés 181 Date d'inscription lundi 3 février 2003 Statut Membre Dernière intervention 22 décembre 2016
20 févr. 2003 à 10:44
à désoler.

si tu sais combien de ranger tu as dans une page.
et que tu as une case fixe(toujours utiliser dans chaque page)

tu fais ca.:
'var
dim i as long
dim count as integer
'debut
count = 0
i=[premire ranger ou et utiliser cette case]
while range("[la colone de cette case]" & i)<> ""
i=i+[nb de rangerpar feuille]
count = count + 1
wend

le count te donne le nombre de page...

a+

marcelin 8-)
0
Rejoignez-nous