Discussion :

[durdesfois]

Bonjour tous les accros,

J' ai besoin de séparer en blocs logiques des infos avant impression.

Alors, voilà, comme le HELP Microsoft est parfois ésotérique, je ne me m' y retrouve pas.

Je comprend la différence entre xlPageBreakAutomatic et xlPageBreakManuel

Seulement, dans l'aide MS, ils se contredisent dans la même phrase, et là, je craque.

Je voudrais récupérer les sauts de page (Numéro de ligne), qu' il soient Automatiques ou Manuels.


C' est possible çà ????

Merci

[SilkyRoad]

bonsoir

Tu peux tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim Vp As HPageBreak
 
For Each Vp In Worksheets("Feuil1").HPageBreaks
    MsgBox Vp.Location.Address
Next Vp

bonne soirée
michel

[durdesfois]

Merci bien,

Ton truc me plais bien, et je le garde sous le coude.

Maintenant, ce qui me tracasse encore, c'est que si je comprends bien MSHELP, on ne peut pas toucher aux PageBreakAutomatic.

Alors si je veux mettre des PageBreakManual, pour eclaircir mon listing, je me retrouve avec un saucissonnage infect à cause des Automatiques qui sont évidemment toujours là.

Je crois bien que je vais d'abord repérer les Automatiques,tamponner un peu les demandes d'écriture, et ajouter des lignes vides, et au revoir les BreakManual.

A+

[durdesfois]

Alors,

Ca y est, ca marche et c'est plutôt propre.

Comme je l'ai dit avant, j'oublie les Breaks Manual.

Dans la feuille concernée, je positionne:

-L' orientaion (Lanscape,Portrait)
-Les Headers, Footers, Marges, etc..

Je récupère la ligne du PageBreaks(1), ce qui me donne le nombre de lignes par pages, dans la config du PageSetup utilisé.

Et Après, en fonction du nombre de lignes courant et de la hauteur de page (Fonction 'mod', j' arrive toujours à me replacer sur un début de page.

Attention, s'il y en a qui essaient le même truc: Si on tente de mettre des bordures xldouble,xlthick, ça devient acrobatique.

Merci de ton aide