Détecter les sauts de page dans excel [Résolu]

Daydayer 201 Messages postés mercredi 1 décembre 2004Date d'inscription 13 août 2005 Dernière intervention - 1 juin 2005 à 10:39 - Dernière réponse : Daydayer 201 Messages postés mercredi 1 décembre 2004Date d'inscription 13 août 2005 Dernière intervention
- 1 juin 2005 à 13:13
bonjour!

jed ois détecter les sauts de pages dans excel à l'aide de VB Editor afin d'insérer des titres en haut de chaque feuille. Auriez-vous une idée de comment détecter ces sauts de pages?

Je ne peux pas détecter ces sauts à partir du nombre de lignes parce qu'elles n'ont pas toutes la même hauteur...

En vous remerkiant!

Daydayerement Vôtre
Afficher la suite 

6 réponses

linasteph 153 Messages postés lundi 16 décembre 2002Date d'inscription 22 juillet 2009 Dernière intervention - 1 juin 2005 à 13:04
+1
Utile
oui c'est exactement ça

ligne 56 sur 1ère page

ligne 57 sur 2ème page
Cette réponse vous a-t-elle aidé ?  
linasteph 153 Messages postés lundi 16 décembre 2002Date d'inscription 22 juillet 2009 Dernière intervention - 1 juin 2005 à 11:06
0
Utile
si c'est le même titre sur chaque page pourquoi ne pas mettre un titre
tout en haut du document excel et ensuite via le menu fichier / mise en
page onlget Feuille définir le titre que tu veux voir sur chaque page
Daydayer 201 Messages postés mercredi 1 décembre 2004Date d'inscription 13 août 2005 Dernière intervention - 1 juin 2005 à 11:48
0
Utile
parce que en début de chaque feuille, ce que j'ai à mettre, ce sont les titres de chaque colonne...
donc dans chaque cellule en début de feuille, je dois mettre des choses différentes. donc avec la mose en page, je ne pourrai pas.

Daydayerement Vôtre
linasteph 153 Messages postés lundi 16 décembre 2002Date d'inscription 22 juillet 2009 Dernière intervention - 1 juin 2005 à 12:13
0
Utile
Parcours les ligne de ta feuille excel est test la valeur PageBreak de chacune.

Si la valeur est égale à xlnone c'est qu'il n'y a pas de saut de page.
Le saut de page se place toujours au-dessus de la ligne que tu donnes
comme argument (dans l'ex 57)



if Worksheets("Feuil1").Rows(57).PageBreak <> xlNone then

break

end if
Daydayer 201 Messages postés mercredi 1 décembre 2004Date d'inscription 13 août 2005 Dernière intervention - 1 juin 2005 à 12:54
0
Utile
lorsque tu dis:
"Le saut de page se place toujours au-dessus de la ligne que tu donnes comme argument (dans l'ex 57)"

cela veut dire que si Worksheets("Feuil1").Rows(57).PageBreak <> xlNone , alors la ligne 56 est sur la page d'avant?

Daydayerement Vôtre
Daydayer 201 Messages postés mercredi 1 décembre 2004Date d'inscription 13 août 2005 Dernière intervention - 1 juin 2005 à 13:13
0
Utile
ok c'est bon, c'est parfait ça marche!

merci beaucoup, c'est trop bien!

Daydayerement Vôtre

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.