Macro impression

Fermé

Xenos1705 Messages postés 93 Date d'inscription lundi 19 octobre 2015 Statut Membre Dernière intervention 11 juin 2018 - 28 sept. 2016 à 08:08
Xenos1705 Messages postés 93 Date d'inscription lundi 19 octobre 2015 Statut Membre Dernière intervention 11 juin 2018 - 28 sept. 2016 à 10:08

Bonjour à tous,

Est-ce que qqun saurait, via macro, comment définir la zone d'impression?

Ce que je souhaite c'est que la zone d'impression s'étende au maximum jusqu'à la dernière cellule renseignée d'une colonne en sachant que la dernière cellule n'est pas forcément à chaque fois sur la même ligne.

D'avance merci pour votre aide.

A+

Xenos

A voir également:

Macro impression
Spouleur d'impression - Guide
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro recorder - Télécharger - Confidentialité

1 réponse

Réponse 1 / 1

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
28 sept. 2016 à 08:54

Bonjour,

Voici un exemple de code qui limite la zone d'impression aux colonnes A à C et à la dernière ligne renseignée de la colonne A :

Sub ZoneImpression()
Dim DerLig As Long
    With Worksheets("Feuil1")
        DerLig = .Range("A" & Rows.Count).End(xlUp).Row
        .PageSetup.PrintArea = "$A$1:$C$" & DerLig
        .PrintPreview
    End With
End Sub

A+

Xenos1705 Messages postés 93 Date d'inscription lundi 19 octobre 2015 Statut Membre Dernière intervention 11 juin 2018
28 sept. 2016 à 10:08

C'est exactement ce dont j'avais besoin...

Merci beaucoup A+

Discussions similaires

Transparence en tete et bas de page

Bordereau code barre caché en rouge

exemplaire

Discussions similaires

Newsletters