Macro pour imprimer une sélection
Résolu
Looping38
Messages postés
91
Date d'inscription
Statut
Membre
Dernière intervention
-
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
et meilleurs vœux à tous.
Je suis bloqué sur une macro d'impression sous excel.
Je souhaite déclencher un l'aperçu avant impression sur une sélection de cellules.
Mon soucis, c'est que certaines colonnes sont masquées, et donc ma définition de range est fausse.
Je cherche la syntaxe qui me permettrait de sélectionner les 10 colonnes "visibles" uniquement.
Actuellement, ma macro est la suivante :
Mais dans ce cas, elle prend bien les 10 colonnes, mais y compris les masquées.
Si vous avez une idée?
Cordialement,
et meilleurs vœux à tous.
Je suis bloqué sur une macro d'impression sous excel.
Je souhaite déclencher un l'aperçu avant impression sur une sélection de cellules.
Mon soucis, c'est que certaines colonnes sont masquées, et donc ma définition de range est fausse.
Je cherche la syntaxe qui me permettrait de sélectionner les 10 colonnes "visibles" uniquement.
Actuellement, ma macro est la suivante :
Sub Imprime_PDF()
'
Range(Cells(8, 2), Cells(109, 10)).Select
Selection.PrintPreview
End Sub
Mais dans ce cas, elle prend bien les 10 colonnes, mais y compris les masquées.
Si vous avez une idée?
Cordialement,
1 réponse
-
Bonjour,
les 10 colonnes "visibles" uniquement.
Vous avez une plage de colonnes fixe ou flottante en fonction des colonnes masquees ??-
-
-
-
Re,
Les colonnes avant d'être masquées sont au nombre de 70 (BX)
Je ne veux pas en imprimer plus de 5 (jusqu'à colonne K) maxi.
Ma macro de tri peut en laisser visible autant qu'on veut, mais lors de l'impression, je ne souhaite pas en faire apparaitre plus de 5, sinon document illisible.
J'ai tenté de faire une copie des colonnes visibles sur une autre feuille, et ça marche, mais je bute sur l'appel de la dialogbox de fichier->imprimer en ayant prédéfinit :
imprimer la sélection ajustées à une page -
Re,
c'est
uniquement les 10 premières colonnes visibles
ou
pas en faire apparaitre plus de 5, sinon document illisible.
Sinon, le principe c'est de compter les colonnes visibles jusqu'au nombre que vous aurez decide et le code devient
'une facon de faireSub Imprime_PDF() CV = 0 With Worksheets("feuil1") For n = 2 To 70 If .Columns(n).Hidden = False Then CV = CV + 1 If CV = 5 Then Exit For Next n .Range(Cells(8, 2), Cells(10, n)).PrintPreview End With End Sub
-
