Macro imprimer ?

Bonsoir je joins un exemple avec lequel j'aimerais qu'un bouton imprimer puisse m'imprimer que les feuille qui contiennent une valeur. Merci pour votre aide.

Bonsoir,

Bien que le fichier joint ne soit pas d'une grande aide, et si j'ai bien compris, essaie ce code :

Sub imprime()
Dim Sh As Worksheet
Dim Plg As Range
For Each Sh In Sheets
    Set Plg = Sh.Cells.Find("*")
    If Not Plg Is Nothing Then Sh.PrintPreview
Next Sh
End Sub

PS, tu remplaces le "PrintPreview" par "Print"....

Bonne soirée

Merci bien, je testerai.