OVH Cloud OVH Cloud

Paramétrage d'imprimante en VBA ?

6 réponses
Avatar
Raymond
Bonjour,

Ou puis je trouver des informations sur le paramétrage d'une imprimante (
Marges, Format, Orientation, ... ) à l'aide de VBA ?

Merci de votre aide et bonne journée,

Ray

6 réponses

Avatar
Buddy
Salut mister

Il me semble qu'il y a une collection Printers dans msaccess

exemple ms pour gérer l'imprimante
With Forms(0).Printer

.TopMargin = 1440
.BottomMargin = 1440
.LeftMargin = 1440
.RightMargin = 1440

.ColumnSpacing = 360
.RowSpacing = 360

.ColorMode = acPRCMColor
.DataOnly = False
.DefaultSize = False
.ItemSizeHeight = 2880
.ItemSizeWidth = 2880
.ItemLayout = acPRVerticalColumnLayout
.ItemsAcross = 6

.Copies = 1
.Orientation = acPRORLandscape
.Duplex = acPRDPVertical
.PaperBin = acPRBNAuto
.PaperSize = acPRPSLetter
.PrintQuality = acPRPQMedium

End With

Pour sélectionner une imprimante par vba
Printers("NomDuPeriph")

Ouala
Buddy


"Raymond" a écrit dans le message de
news:%
Bonjour,

Ou puis je trouver des informations sur le paramétrage d'une imprimante (
Marges, Format, Orientation, ... ) à l'aide de VBA ?

Merci de votre aide et bonne journée,

Ray




Avatar
Raymond [mvp]
Bonjour.

l'objet Printer n'est géré qu'à partir de la version 2002. pour les versions
antérieures voir : http://access.seneque.free.fr/etats.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Buddy" a écrit dans le message de
news:
Salut mister

Il me semble qu'il y a une collection Printers dans msaccess



Avatar
Raymond
Merci Buddy, mais ma version Access ( 2000 ) ne gère pas la collection
Printers !!

Par contre j'ai trouvé un début de solution sur le lien donné par Raymond !!

Merci et bonne journée,
Ray


"Raymond" a écrit dans le message de
news:%
Bonjour,

Ou puis je trouver des informations sur le paramétrage d'une imprimante (
Marges, Format, Orientation, ... ) à l'aide de VBA ?

Merci de votre aide et bonne journée,

Ray




Avatar
Raymond
Bonjour Raymond,

J'ai récupéré le code du document états.htm cité ci-dessous, je l'ai copié
dans un module de classe et ......
Et je ne sais pas comment l'utiliser !
J'ai honte, mais tant pis !!!

Un petit tuyau serait le bien venu !!

Merci d'avance et bonne journée,
Ray ( le stéphanois !! )




"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.

l'objet Printer n'est géré qu'à partir de la version 2002. pour les
versions

antérieures voir : http://access.seneque.free.fr/etats.htm

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Buddy" a écrit dans le message de
news:
Salut mister

Il me semble qu'il y a une collection Printers dans msaccess







Avatar
Raymond [mvp]
Donc tu as un module de classe nommé Etat comme indiqué.
pour utiliser ce module de classe il faut le déclarer en tant qu'objet par :
Dim Rpt As New Etat
que tu places en déclaratives en haut de ton formulaire pour ne pas le faire
plusieurs fois.

tu veux exécuter un état mais tu veux changer le nombre de copies (3) et
l'orientation(portrait):
Rpt.Mise_En_Page "etat1", Portrait, 3
Rpt.Imprimer "etat1"
si tu veux rechanger les valeurs après impression:
Rpt.Mise_En_Page "etat1", Paysage, 1

ces fonctions doivent bêtre mises en général dans l'événement click d'un
bouton.

Bravo pour l'ASSE !
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Raymond" a écrit dans le message de
news:uHs%23i$
Bonjour Raymond,

J'ai récupéré le code du document états.htm cité ci-dessous, je l'ai copié
dans un module de classe et ......
Et je ne sais pas comment l'utiliser !
J'ai honte, mais tant pis !!!

Un petit tuyau serait le bien venu !!

Merci d'avance et bonne journée,
Ray ( le stéphanois !! )



Avatar
Raymond
Merci Raymond !!!
Si un jour tu passes à Saint-Etienne, fais le moi savoir !!!
Ray


"Raymond [mvp]" a écrit dans le message de
news:OJm6%
Donc tu as un module de classe nommé Etat comme indiqué.
pour utiliser ce module de classe il faut le déclarer en tant qu'objet par
:

Dim Rpt As New Etat
que tu places en déclaratives en haut de ton formulaire pour ne pas le
faire

plusieurs fois.

tu veux exécuter un état mais tu veux changer le nombre de copies (3) et
l'orientation(portrait):
Rpt.Mise_En_Page "etat1", Portrait, 3
Rpt.Imprimer "etat1"
si tu veux rechanger les valeurs après impression:
Rpt.Mise_En_Page "etat1", Paysage, 1

ces fonctions doivent bêtre mises en général dans l'événement click d'un
bouton.

Bravo pour l'ASSE !
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Raymond" a écrit dans le message de
news:uHs%23i$
Bonjour Raymond,

J'ai récupéré le code du document états.htm cité ci-dessous, je l'ai
copié


dans un module de classe et ......
Et je ne sais pas comment l'utiliser !
J'ai honte, mais tant pis !!!

Un petit tuyau serait le bien venu !!

Merci d'avance et bonne journée,
Ray ( le stéphanois !! )