Macro pour imprimer une sélection

Résolu/Fermé
Looping38 Messages postés 92 Date d'inscription samedi 22 octobre 2016 Statut Membre Dernière intervention 20 juillet 2020 - Modifié le 5 janv. 2018 à 11:32
f894009 Messages postés 16854 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 26 janvier 2023 - 5 janv. 2018 à 14:52
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 :
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,

A voir également:

1 réponse

f894009 Messages postés 16854 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 26 janvier 2023 1 679
5 janv. 2018 à 11:50
Bonjour,

les 10 colonnes "visibles" uniquement.
Vous avez une plage de colonnes fixe ou flottante en fonction des colonnes masquees ??
0
Looping38 Messages postés 92 Date d'inscription samedi 22 octobre 2016 Statut Membre Dernière intervention 20 juillet 2020 1
5 janv. 2018 à 12:24
Bonjour
Je souhaite au final imprimer uniquement les 10 premières colonnes visibles de la feuille dans la limite de la ligne 109.
Les colonnes conservent leur nom d'origine, les autres sont masquées par une autre macro de tri.
0
Looping38 Messages postés 92 Date d'inscription samedi 22 octobre 2016 Statut Membre Dernière intervention 20 juillet 2020 1
5 janv. 2018 à 12:25
Je passe par la fonction d'imprimer la sélection.
0
f894009 Messages postés 16854 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 26 janvier 2023 1 679
5 janv. 2018 à 13:18
Re,

une autre macro de tri.
Tout a fait Thierry, mais la derniere colonne visible est toujours le meme ou pas ??
0
Looping38 Messages postés 92 Date d'inscription samedi 22 octobre 2016 Statut Membre Dernière intervention 20 juillet 2020 1
5 janv. 2018 à 14:11
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
0
f894009 Messages postés 16854 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 26 janvier 2023 1 679
5 janv. 2018 à 14:52
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 faire
Sub 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
0