PB Impression de base

cs_MickG Messages postés 4 Date d'inscription mardi 13 janvier 2004 Statut Membre Dernière intervention 16 janvier 2004 - 16 janv. 2004 à 18:01
Klok Messages postés 35 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 30 avril 2008 - 19 janv. 2005 à 13:55
Avec le source suivant

Public Sub setup()
With DialogPrint
.Flags = cdlPDPrintSetup
.PrinterDefault = True
.ShowPrinter

MsgBox (Printer.PaperSize)

End With
End Sub

Où DialogPrint est de type CommonDialog
Mon problème est que dans la fenêtre de configuration de l'impression je change de la taille de papier mais la commande "MsgBox (Printer.PaperSize)" me renvoie toujours 9
Les modifications des paramètres de l'imprimante ne sont pas répercutés dans l'objet PRINTER

1 réponse

Klok Messages postés 35 Date d'inscription mercredi 19 décembre 2001 Statut Membre Dernière intervention 30 avril 2008
19 janv. 2005 à 13:55
il faut affecter la propriété papersize a l'objet printer
printer.papersize=.papersize
Florent
0
Rejoignez-nous