Gestion des saut de pages sous VBA.

[wilfried]

Bonjour,

J'ai une macro qui me mets en forme des mesures importer depuis un système GPIB via fichier texte. L'importation et la mise en forme fonctionne nickel. Mon sousi est de gérer les saut de page: en effet si j'ai plus de 20 mesure je me retrouve avec en page 2 une ligne vide qui correspond à la fin de mon tableau. J'aimerai donc pouvoir définir les zone correspondant à chaque page. Mais voila je n'est pas réussi à le faire tous seul :-( sniff

Donc si une Âme charitable avait une idée ou un exemple à me proposé je suis preneur.

A+ Wilfried ;op

 

[wilfried]

Re

Petite précision, j'ai déjà regarder dans la zone chercher : "saut de page" et dans l'espace télécharger.

Merci d'avance.

A+ Wilfried

 

[@+Thierry]

Bonjour Wilfried, le Forum

Je te conseille ce Fil qui devrait te mettre sur une piste...

=> Lien supprimé

Bon Appétit
@+Thierry

 

[wilfried]

Merci @+thierry,

Je vais tester le tous et surment devoir l'adapter car je bosse sous excel 97!!!! et effectivement les select à tous va sont très ch..... mais bon.

Je te tiens au courant.

Ps tant que je t'est au clavier ;op comment fait tu pour masquer les onglet des feuilles sans masquer les feuille elle mêmes (cf usf du fils : <http://www.excel-downloads.com/html/French/forum/messages/1_145327_145327.htm>

A+ Wilfried ;op

 

[Pascal76]

Bonjour

Je peux Thierry ???

Outils>Options> onglet affichage décocher en bas "onglets de classeur"

Pascal

 

[@+Thierry]

Bonjour Pascal, re Wilfried

Bien sûr que tu peux, Pascal, bien au contraire, ce n'est pas un forum de compétition ici, pas comme certain où ils font la course pour être à la minute plus rapide que l'autre... si vous suivez mon regard...

Donc en prime, pour m'excuser de mon impardonnable retard (excusez, je révisais VlookUp en Français... lol), la même chose en VBA :

ActiveWindow.DisplayWorkbookTabs = False

Bon Appétit
@+Thierry

 

[Pascal76]

oups

En fait après le

Je peux thierry ??? j'avais prévu de mettre Mais j'ai oublié

Allez bonne journée

Pascal

 

[wilfried]

Merci à vous deux pour ces explications.

Je vais encore abuser de votre temps :

Dans le fils que tu m'as donné, Johanne utilise :

Cells.Select
ActiveSheet.ResetAllPageBreaks

pour effaceé les sauts de page existant.

Mon problème est que chez moi cela ne fonctionne pas il me laisse le saut comme il était, et vu que j'en rajout un à la ligne d'après je me retrouve avec une page qui ne comporte qu'une seul ligne :-(

Je vais continué a chercher de mon coté mais si quelqu'un à une explication.

mon code :

set ws=activesheet
cells.select
ws.resetallpagebreaks

A+ Wilfried ;op

 

[wilfried]

Bonjour,

J'ai corriger mon erreur de gestion du nombre de ligne max (j'avait oublier que si je veux 62 ligne par page, en commencant en A1 il faut que je me décale de 61 et non 62!!!! ;op)

Bon en tous cas un grand merci pour ces réponses.

A+ Wilfried ;op