ACDL a écrit :
Je ne comprend pas pourquoi la colonne P ou O s'imprime quand même ?
Ce que tu me raconte là n’est (presque) pas possible !
En faisant se dérouler la macro au pas-à-pas, tu vois très bien que l’instruction Range("D:D,N:P").EntireColumn.Hidden = True fait son boulot très correctement.
As-tu magouillé ma macro ? Si vraiment ça ne va toujours pas, envoie-moi ton fichier avec le problème.
Si tu désires l’aperçu avant impression, tu peux utiliser le code suivant :
Option Explicit
Sub Macro1()
Application.ScreenUpdating = False
Range("D:D,N:P").EntireColumn.Hidden = True
ActiveWindow.SelectedSheets.PrintPreview
'ActiveWindow.SelectedSheets.PrintOut
Cells.EntireColumn.Hidden = False
Range("A10").Activate
End Sub
J’ai neutralisé l’instruction ActiveWindow.SelectedSheets.PrintOut car ça ne fait pas vraiment sens d’ouvrir l’aperçu puis de laisser la macro imprimer dans tous les cas. Ca semble plus logique – si tu ouvres l’aperçu – que tu décides toi-même si tu imprimes ou non.
Chaleureusement.