Comment définir une zone d'impression dans le pagesetup???

[Paritec]

Bonsoir à tous,
je cherche à définir une zone d'impression dans la pagesetup, qui serait de la ligne 4 à la dernière ligne remplie mais je ne trouve pas la syntaxe
la ci-dessous m'aurait bien plu mais hélas c'est pas cela ne marche pas alors si vous pouvez me compléter cela ce sera très bien pour mes nerfs !!!! brbr
a+
Papou

fin=feuil7.range("B" & rows.count).end(xlup).row
Feuil7.PageSetup.PrintArea = Feuil7.Range("B4:O" & fin)

 

[JCGL]

Re : Comment définir une zone d'impression dans le pagesetup???

Bonjour à tous,
Salut Papou,

Peux-tu essayer :

Fin = Feuil7.Range("B" & Rows.Count).End(xlUp).Row
Feuil7.PageSetup.PrintArea = "$B$4:$O$" & Fin

A+ à tous

 

[Compte Supprimé 979]

Re : Comment définir une zone d'impression dans le pagesetup???

Salut Paritec

Un truc du style

  With Sheets("Feuil1")
    fin = .Range("B" & Rows.Count).End(xlUp).Row
    .PageSetup.PrintArea = "$B$4:$O$" & fin
  End With

A+

Edit : Oups salut JC

 

[Paritec]

Re : [RESOLU]Comment définir une zone d'impression dans le pagesetup???

Bonsoir JC Bruno,
Bon parfait messieurs, mais quel couillon je fais !!!!
merci pour tout et bonne soirée
A+
Papou

 

[JCGL]

Re : [RESOLU]Comment définir une zone d'impression dans le pagesetup???

Bonjour à tous,
Salut Bruno,

Bon parfait messieurs, mais quel couillon je fais !!!!

Il m'arrive aussi de rester bloqué sur une évidence.

A++ les amis
A+ à tous