Application.Dialogs(xlDialogPrint)

Bonjour à tous le forumeurs

J'ai beau chercher sur le forum comme sur la toile : niet.

Je voudrai un code qui me permet d'imprimer un UserForm avec ouverture de la boite de dialogue de l'imprimante afin de pouvoir choisir son imprimante, le nombre de feuille, etc...

Pour imprimer un UserForm j'utilise la fonction .PrintForm qui marche très bien mais avant je voudrai l'affichage de la boite de dialogue de l'impression.

Quelqu'un aurait-il la solution.

Merci d'avance votre aide toujours aussi précieuse.

Amicalement

Noel

Bonjour cfn3cfn

Essaye ca

If Application.Dialogs(xlDialogPrinterSetup).Show = True Then 
      Userform1.PrintForm
End If

A+

Bonjour BrunoM45 ,

Cette fonction je l'ai Ce que je n'arrive pas c'est d'avoir (voir fichier joint)

Sinon les utilisateurs risquent de ne pas comprendre pourquoi cette fenêtre. Ils ne sauront quoi faire

Peux-tu comprendre les utilisateurs.Sortie de leur train train quotidien, ils ns savent plus rien faire.

Aurais-tu dans tes cases ce bout de code.

Merci d'avance

Amicalement

Noel

Re,

Alors il te faut utiliser

If Application.Dialogs(xlDialogPrint).Show = True Then
  Userform1.PrintForm
End If

A+

Re,

Merci c'est bon ça fonctionne à merveille.

Un grand merci

@+

Amicalement

Noel

Bonjour BrunoM45 ,

Je suis désolé. Je ne suis pas allé jusqu'au bout de l'impression.

Suite à ça cela m'imprime le contenu de ma feuille de mon classeur alors que je voudrai imprimer l'USF.

Merci de me tenir informé.

Amicalement

Noel