J
josothy
Guest
bonjour
j'ai un problème avec la macro :
Sub Imprimer()
If Application.Dialogs(xlDialogPrinterSetup).Show Then
With ActiveSheet.PageSetup
.PrintArea = "$A$1:$AA$90"
.Orientation = xlLandscape
End With
ActiveSheet.PrintOut
End If
End Sub
Dans la boite de dialogue je met imprimer en paysage et sa m'imprime de C2 à A?36 et je suis en train d'y passer la ramette de papier. help me !!!
j'ai un problème avec la macro :
Sub Imprimer()
If Application.Dialogs(xlDialogPrinterSetup).Show Then
With ActiveSheet.PageSetup
.PrintArea = "$A$1:$AA$90"
.Orientation = xlLandscape
End With
ActiveSheet.PrintOut
End If
End Sub
Dans la boite de dialogue je met imprimer en paysage et sa m'imprime de C2 à A?36 et je suis en train d'y passer la ramette de papier. help me !!!