Share via


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