Imprimer selon critères

[pokpok]

Bonjour

Voici mon fichier excel pour générer des numéros d'étiquettes. J'aimerais avoir un bouton imprimer qui va imprimer uniquement la colonne C qui contient une valeur , les cellules vides ne doivent pas être imrpimer.

Est-ce que vous pouvez m'aider svp

Merci

 

[DoubleZero]

Re : Imprimer selon critères

Bonjour à toutes et à tous,

Bienvenue sur XLD, pokpok.

Peut-être ainsi :

Option Explicit
Sub Cellules_renseignées_imprimer()
ActiveSheet.PageSetup.PrintArea = Range(Range("c2"), Range("c2").End(xlDown)).Address
End Sub

A bientôt 🙂

 

[DoubleZero]

Re : Imprimer selon critères

Re-bonjour,

Pour lancer également l'aperçu ou l'impression :

Option Explicit
Sub Cellules_renseignées_imprimer()
With ActiveSheet
.PageSetup.PrintArea = Range(Range("c2"), Range("c2").End(xlDown)).Address
.PrintPreview 'aperçu
'.PrintOut 'impression
End With
End Sub

A bientôt 🙂