[vba]Ignorer marges d'impressions

Ignorer marges d'impressions [vba] - VB/VBA/VBS - Programmation

Marsh Posté le 11-08-2004 à 08:07:28    

Bonjour,
 
existe-t-il un moyen d'ignorer automatiquement les marges d'impression ?
 
J'ai créé un programme qui sert à imprimer automatiquement des documents en fonction de données entrée dans un formulaire.
 
Ce programme, via une fonction MiseEnPage mets en page le format papier.
Seulement un problème se pose lorsque je clique sur imprimer dans mon formulaire : je dois quitter le programme pour avoir accès à la boîte de dialogue me demandant d'ignorer les marges d'impression. C'est très  gênant, y-a-t-il moyen d'éviter ça ?
 
D'avance Merci

Reply

Marsh Posté le 11-08-2004 à 08:07:28   

Reply

Marsh Posté le 11-08-2004 à 08:23:10    

Bonjour,
Tu peux essayer cela  
 
Application.Dialogs(xlDialogPrint).Show
 
Sans sortir de ton programme tu auras la possibilité de faire tous tes réglages avant impression

Reply

Marsh Posté le 11-08-2004 à 08:55:06    

Tout d'abord je te remercie pour ta réponse :)
 
 
J'ai essayé ceci, comme je suis sous Word j'ai voulu tester ces deux fonctions :

Code :
  1. Application.Dialogs(wdDialogFilePrint).Show


Code :
  1. Application.Dialogs(wdDialogFilePrintSetup).Show


 
Seulement, à l'exécution, le déboggueur me retourne une erreur :

Citation :

Erreur d'exécution '5217' : Aucune imprimante n'est installée. Pour ...


 
Pourtant une imprimante est bien installée (mais en réseau)
 
Est-ce que c'est parce que c'est une imprimante réseau que cela ne fonctionne pas ? Si oui, y-a-t-il un moyen de contourner ce problème ?
 
Merci

Reply

Marsh Posté le 11-08-2004 à 09:08:04    

après tests sur une imprimante locale, j'ai toujours le même problème :o

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed