question de débutant

romulus37

XLDnaute Nouveau
bonjours,
comment doit on proceder pour imprimer dans un tableau uniquement les lignes chiffrées: exemple feuille de commande de plusieur pages.
romulus37
 

Brigitte

XLDnaute Barbatruc
Re : question de débutant

Bonsoir,

Un genre comme ca peut être :

Code:
Sub ImpressionArchives()
'
' ImpressionZonePleine Macro
' Macro enregistrée le 30/10/2007 par XXXXXX'
ActiveSheet.PageSetup.PrintArea = Range("A1:A" & _
    Range("A65536").End(xlUp).Row).Address
        End Sub

A adapter avec tes cellules

Je crois que c ce qu'on m'a donné ici (Pierrot93 https://www.excel-downloads.com/threads/definir-zone-impression-mouvante.83896/) pour ne sélectionner et donc imprimer que ce qui est "plein".
 

thomlau

XLDnaute Occasionnel
Re : question de débutant

Bonsoir Romulus. Bonsoir le forum (jamais 2 sans 3)

Dans la zone que tu veux imprimer, tu sélectionne une zone d'impression max. Dans cet exemple, sur la feuil1, tu selectionne de B4 à M72.
Va dans noms/définir et mets imprimer

Dans le champ "fait référence à..."
tu mets ceci :

=DECALER(Feuil1!$B$4:$M$4;;;MAX(SI(Feuil1!$B$4:$B$50<>"";LIGNE(Feuil1!$B$4:$B$72)-3)))


Dans le code de ta feuille...
Code:
Private Sub WorkSheet_activate()
Module1.impression
End Sub

Le code du Module1...
Code:
Sub impression
ActiveSheet.PageSetup.PrintArea = "imprimer"
End Sub

Ainsi, si j'ai pas fait d'erreur, ta zone d'impression se fait automatiquement...

++
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 677
Messages
2 090 825
Membres
104 677
dernier inscrit
soufiane12