générer un pdf

[greenjack]

Bonjour,

Je suis entrain de concevoir un doc pour simplifier la procédure des devis dans ma société.

Je m'explique, j'ai 2 feuilles.
Sur la 1ere feuille 'données' on rentre les infos et on peut imprimer à l'aide de bouton.

Sur la 2eme feuille, j'ai disposé 23 zones imprimables avec un schema different dans chaque zone imprimable.

Mon problème est le suivant :

Lorsque je clique sur un bouton dans la première feuille,cela imprime directement la zone en relation avec le bouton, mais j'(aimerais qu'il me propose la fenetre imprimer pour pouvoir choisir mon logiciel pdf995 afin de convertir en pdf, mais je ne sais vraiment pas comment faire.

Si vous avez une idée .....

Pour info : mon code dans VB
----------------------------------

Private Sub CommandButton1_Click()
Sheets('FICHE METALLIQUE').Select
ActiveSheet.PageSetup.PrintArea = '$A$1:$AB$72'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets('DONNEES').Select
Range('A10').Select
End Sub

------------------------------------

Merci d'avance

 

[Gorfael]

greenjack écrit:

Pour info : mon code dans VB
----------------------------------

Private Sub CommandButton1_Click()
Sheets('FICHE METALLIQUE').Select
ActiveSheet.PageSetup.PrintArea = '$A$1:$AB$72'

'ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveWindow.SelectedSheets.PrintPreview
Sheets('DONNEES').Select
Range('A10').Select
End Sub

ça lance l'aperçu avant impression, et tu dois pouvoir modifier l'imprimante
A+