Bonjour,
J'ai un fichier (de mesures) avec une zone d'impression variable (en gros, la zone à imprimer dépend du nombre de mesures.
Je souhaite donc pouvoir visualiser cette zone variable et ensuite l'imprimer en format papier ou pdf.
Le problème est que j'arrive à visualiser & imprimer mais je n'arrive pas à imprimer en pdf...
J'ai pour l'instant le code suivant :
Sub Impressionsheet1()
Dim nbligne As Integer
Range("A17:S17").Select
nbligne = Range("A17", Selection.End(xlDown)).Cells.Count
Range(Selection, Selection.End(xlDown)).Select
Selection.Rows.AutoFit
Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
End Sub
En cherchant un peu j'ai aussi trouvé cette fonction qui me permet d'afficher la bonne fenêtre de visualisation + impression ou sauvegarde en pdf :
Sub Impressionsheet2()
Range("a1:b33").Select
Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
End Sub
Cela marche parfaitement pour une plage à imprimer fixe mais pas pour une plage de variable...
D'où ma question : comment ouvrir la fenêtre zone d'impression qui me permet de choisir mon mode d'impression (imprimante ou pdf donc) et ce pour une plage de donnée variable?
Merci beaucoup d'avance.
Thierry