Pascal, le Forum
C'est bon cela fonctionne, je vais changer l'ordre de mes colonnes pour avoir l'impression dans le bon ordre, par contre je n'ai plus les entètes de colonnes, es-ce normale? Voila ce que cela me donne :
Private Sub CommandButtonImpressionDossiersSortis_Click()
Columns("B
").EntireColumn.Hidden = True
Columns("J:N").EntireColumn.Hidden = True
Columns("T").EntireColumn.Hidden = True
Sheets("Tool_Dossiers").[T7].AutoFilter Field:=15, Criteria1:="Sorti"
ActiveWindow.SelectedSheets.PrintOut
MsgBox "Impression en cours"
Sheets("Tool_Dossiers").AutoFilterMode = False
Columns("A:T").EntireColumn.Hidden = False
End Sub
Merci, G'Claire