Zone d'impression en VBA

CBernardT

XLDnaute Barbatruc

• 27 Mai 2006

• #2

Boonjour Stéph79 et le forum,

Essayes avec cette ligne de code :

ActiveSheet.PageSetup.PrintArea = '$A$1:$G$35'

Cordialement

Bernard

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 27 Mai 2006

• #3

bonjour steph, bernard 🙂

printarea attend une addresse, et non une plage de valeur.

currentregion doit etre précédé d'un range.

ActiveSheet.PageSetup.PrintArea = ActiveCell.CurrentRegion.Address

ou

ActiveSheet.PageSetup.PrintArea = range('a1').CurrentRegion.Address

salut

Message édité par: hervé, à: 27/05/2006 11:34

 

Vote positif 0 Vote négatif

S

Stéph79

Guest

• 27 Mai 2006

• #4

Bonjour Hervé, Bernard,

Merci pour vos messages.

Hervé, j'ai du mal à mettre en oeuvre ta proposition, en fait seul la cellule A1 fait partie de la zone d'impression.

En fait, je n'ai peut-être pas été suffisamment précis, la zone que je souhaiterais définir comme zone d'impression est déjà sélectionnée. Je voudrais que cette sélection devienne zone d'impression.

Merci pour votre aide.
Stéph79

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 27 Mai 2006

• #5

re 🙂

alors, tout simplement :

ActiveSheet.PageSetup.PrintArea = Selection.Address

salut

 

Vote positif 0 Vote négatif

S

Stéph79

Guest

• 27 Mai 2006

• #6

Hervé,

Comme tu dis : tous simplement ...
Dire que je buttais dessus depuis déjà un bon moment !

Merci beaucoup

 

Vote positif 0 Vote négatif