Bug macro de mise en page

[nomitse]

Bonjour à tous,
J'ai créé une macro qui génère plusieurs mises en page sur une même feuille afin de pouvoir gérer les formats d'impression. lors de la création d'une zone d'impression ou je modifie les sauts de pages manuellement elle bug. Cependant parfois elle marche....

pourquoi?

Merci d’avance,

Simon

 

[Robert]

Bonjour Simon, bonjour le forum,

Essaie sans Set, c'est quelqu'un de Sète qui te le dis...

 

[nomitse]

Bonjour Robert,

Ca ne fonctionne toujours pas

Comprends pas...

 

[nomitse]

En fait ca marche la première fois que je la fait tourner et puis elle plante.

 

[Robert]

Re,

Le problème ne se trouverait-il pas dans la partie du code qui manque ?

 

[job75]

Bonjour nomitse, Robert,

Supposons que le 1er saut de page vertical soit à gauche de la colonne H et que la cellule T240 contienne le texte "aaa".

La propriété Location renvoie un Range donc comprenez bien que l'instruction :

ActiveSheet.VPageBreaks(1).Location = Range("T240")

copiera la valeur "aaa" de T240 et la collera en H1.

Maintenant s'il n'y a aucun saut de page vertical l'instruction créera un bug, c'est logique.

A+

 

[Robert]

Bonjour le fil, bonjour le forum,

Pourquoi ce nom Job75 !?... Boss serait tellement plus approprié...

 

[nomitse]

Bonjour, merci pour votre aide