AvailablePrinters Property [Visio 2003 SDK Documentation]
Returns a list of installed printers.
retVal = object**.AvailablePrinters**
retVal String. An array of printers installed on the computer.
object Required. An expression that returns an Application object.
Version added
2002
Example
The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the AvailablePrinters property to get a list of available printers.
Public Sub AvailablePrinters_example()
Dim aStrPrinters() As String
Dim strPrinter As Variant
aStrPrinters = Application.AvailablePrinters
For Each strPrinter In aStrPrinters
Debug.Print strPrinter
Next
End Sub
Applies to | Application object | InvisibleApp object