Macro VBA pour envoyer un tableau Excel par fax

Bonjour à tous,

je viens vers vous car la je bloque.

Je vous explique , jusqu'à maintenant je remplissais un tableau excel qui par l'appui sur un bouton , remplissait une autre feuille puis lancer l'impression automatique de cette derniere, puis je l'envoyais par fax ( Fax traditionnel)
Maintenant, nous allons avoir une imprimante Fax et je voudrais pouvoir , toujours en appuyant sur mon bouton , remplir l'autre feuille , avoir la vue avant impression de cette feuille et un encart demandant si la feuille est complete ( oui , non ), si elle n'est pas bien remplie on clique sur non et on revient sur cette derniere pour pouvoir la modifier. Si elle est bien remplie , on clique sur Oui et à ce moment la feuille est envoyée automatiquement par FAX via l'imprimante.
J'espere avoir été assez claire

En attendant vos réponses , je vous remercie

Citation:

---

Envoyé par lovlov33

avoir la vue avant impression de cette feuille

---

Utilise la méthode PrintPreview sur ta Worksheet.

Citation:

---

et un encart demandant si la feuille est complete ( oui , non ), si elle n'est pas bien remplie on clique sur non et on revient sur cette derniere pour pouvoir la modifier.

---

Utilise une fonction MsgBox en mettant le résultat dans une variable.

Code:

---

If MsgBox("Envoyer cette page par Fax ?",vbOKCancel) <> 1 Then Exit Sub

---

Le problème, c'est que ce message ne s'affichera que lorsque l'utilisateur aura fermé la fenêtre de prévisualisation.

Citation:

---

la feuille est envoyée automatiquement par FAX via l'imprimante.

---

Normalement, lorsqu'une telle imprimante est envoyée, il y a deux drivers : un pour l'imprimante et un pour le fax.
Donc, il faut que tu utilises la méthode PrintOut sur ton objet Worksheet en précisant comme paramètre le nom du drivers du fax.