Salut le forum et denjo,
Si j'ai bien compris ton soucis, tu ne veux pas imprimer certaines colonnes. Je te propose donc de les masquer avant de les imprimer puis les ré-afficher
Range("B:B,E:G,I:AJ").EntireColumn.Hidden = True
ActiveWindow.SelectedSheets.PrintOut copies:=1, collate:=True
Range("B:B,E:G,I:AJ").EntireColumn.Hidden = False
Si je n'ai pas compris, n'hésite pas à le faire savoir!!
@+
Valérie