Bonjour à tous,
Pour faire des restitutions sur papier de données je suis amené à définir une zone d'impression dans des fichiers.xls
Problématique:
Les fichiers.xls à traiter changent de taille d'une fois à l'autre et par voie de conséquence la zone d'impression aussi.
J'ai enregistré un code que voici.
Sub zone_impression()
Range("A12").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.PageSetup.PrintArea = "$A$12:$D$30"
ActiveWindow.SelectedSheets.PrintPreview
End Sub
Cependant "$A$12:$D$30" pour un fichier peut devenir "$A$12:$D$45" pour un autre fichier.
J'ai essayé --> ActiveSheet.PageSetup.PrintArea = ""
Cela me sélectionne toutes les données de la feuille active, ce n'est pas le but.
Merci à qui prendra un peu de son temps pour m'aider.
En pièce jointe, type de fichier d'où je fais des restitutions.
Bonne soirée.
Joël