Recherche numéro de page

Bonjour à tous,

Je cherche désespérément une solution à mon soucis

J'ai un fichier excel avec une base de données qui dispatche une fois remplie les données vers plusieurs onglets.

cependant la hauteur des lignes divergent c'est pour cela que j'ai trouvé ce code .Rows("1:1000").EntireRow.AutoFit<br>

Mais le soucis est qu'en recopiant les données, elles s'enchainent et je n'arrive plus a recréer ma mise en page (avec des titres, pagination ....)

Ce que j'aimerai pouvoir faire c'est

Avoir le numéro de page de la dernière cellule non vide.

pouvoir le comparer avec le numéro de page ou j'insère mes données s'il sont égaux continué d'insérer sinon faire un saut de page et inserer mes titres et recommencer l'insertion de données

Je ne sais pas si je suis clair je vais essayer de faire un exemple

recherche page derniere cellule = 1

Insertion en A4 ( test si A4 est bien en page 1)

si oui continuer insertion B4 C4 ....

si non saut de page .Rows(fin1).PageBreak = xlPageBreakManual

et copier les titres dans un autre onglet et les coller à la suite

Merci de votre lecture.

Mika

Hello!

Peut être une question bête mais pourquoi n'utilises-tu pas la fonctionnalité Imprimer les titres en spécifiant la ligne de la colonne d'en-tête?

En mode page elle se répèterait alors à chaque saut de page.

Bien le bonjour,

Merci de ta réponse j'ai déjà essayé ce type de procédure malheureusement j'ai sur la page 1 un titre de 6 lignes et sur la page 2 le titre fait 5 lignes

schéma page 1 :
1
2
3
4
5
6

page 2
1
2
3
5
6

cordialement,
Mika

Tu as la possibilité de poster un fichier exemple?

Merci de ton aide

j'ai trouvé une solution pour réussir ce que je souhaitais faire

Bien cordialement,

Mika

Rechercher des sujets similaires à "recherche numero page"