how to choose a printer

[saymard]

Hi every body

I'm looking for a way to be able to choose a specific printer and to set
the margins of the report. Is it possible with the vba code ? Does some
body know how ?

Thanks for your help

 

[Juan M. Afan de Ribera]

If you are using Access XP or above you can use the Printers collection to
choose a specific printer.

If this is not your case, you can write this function in a standard module
(it retrieves the names of the printers)

Public Function wshPrinters() As Collection
Dim wshNetwork As Object 'New wshNetwork
Dim col As New Collection
Dim i As Integer

Set wshNetwork = CreateObject("WScript.Network")

With wshNetwork.EnumPrinterConnections
For i = 0 To .Count - 1
If i Mod 2 <> 0 Then
col.Add .Item(i)
End If
Next
End With

Set wshPrinters = col

Set col = Nothing
Set wshNetwork = Nothing

End Function

and you can call it in this way

Sub EnumPrinters()
Dim prn As Variant

For Each prn In wshPrinters
Debug.Print prn
Next

End Sub

For setting the report's margins you better have a look at PrtMip property
in Access help.

--
Saludos desde Barcelona
Juan M. Afan de Ribera
<MVP Ms Access>
http://www.juanmafan.tk
http://www.clikear.com/webs4/juanmafan

 

[Dev Ashish]

(e-mail address removed) (saymard) wrote in

I'm looking for a way to be able to choose a specific printer and to set
the margins of the report. Is it possible with the vba code ?

In Access 2002+, there's the Printers collection you can use. For other
versions, see

[ http://www.mvps.org/access/reports/rpt0009.htm ]

-- Dev

 

[saymard]

dans l'article [email protected], Dev Ashish à
(e-mail address removed) a écrit le 3/11/03 21:32 :

(e-mail address removed) (saymard) wrote in

I'm looking for a way to be able to choose a specific printer and to set
the margins of the report. Is it possible with the vba code ?

In Access 2002+, there's the Printers collection you can use. For other
versions, see

[ http://www.mvps.org/access/reports/rpt0009.htm ]

-- Dev

Thank you for your help

Eric

 

[saymard]

dans l'article (e-mail address removed), Juan M. Afan de Ribera
à (e-mail address removed) a écrit le 3/11/03 21:32 :

If you are using Access XP or above you can use the Printers collection to
choose a specific printer.....

Thank you for your help