en VBA: comment imprimer seulement 1 partie d' tab

[Flam]

Bonjour le FORUM

J'aimerai créer un bouton en VBA qui me définirait une zone d'impression avec seulement la partie remplie d'un grand tableau.
En sachant que le tableau peut être + ou - remplie cela dépend des fois.
Ne pas définir dans la zone les lignes vides de la fin de tableau, si possible ?

Amicalement Flam

 

[_Thierry]

Bonjour Flam, le Forum

Voici trois méthodes cousines, à voir en fonction de tes besoins :

Sub DefinePrintZoneExemple1()
    ActiveSheet.PageSetup.PrintArea = ActiveCell.CurrentRegion.Address
End Sub


Sub DefinePrintZoneExemple2()
Dim Plage As Range

Set Plage = Range(Range('A1'), Range('D65536').End(xlUp))

ActiveSheet.PageSetup.PrintArea = Plage.Address
End Sub

Sub DefinePrintZoneExemple3()
Const PrintZone As String = 'A1:G'

Dim LastRow As Long

LastRow = Range('A65536').End(xlUp).Row

ActiveSheet.PageSetup.PrintArea = PrintZone & LastRow
End Sub

Bonne Journée
[ol]@+Thierry[/ol] J - 4


EDITION, je viens dfe voir un post de Pascal .... Arf !! J - 3 !!!

Et même J - 2 puisque je suis à Lyon dès Vendredi !

Message édité par: _Thierry, à: 21/09/2005 08:16

 

[Flam]

Re:en VBA: comment imprimer seulement 1 partie d'

BONJOUR et MERCI Thierry[/b]

C'est exactement ce que je désirai
Encore une fois MERCI pour ce petit renseignement

Flam