I just try to get the name of all the printers installed on the computer, but I cannot find the way to do it

I tried :

Dim Id2 As ImgXPrint_Printer
Dim Toute As ImgXPrint_Printers

For Each Id2 In Toute
....blalbla
Next

I certainely missed some Set..., but i can't find the right one :-(

Thanks for your help
 

This works for me. 

Dim prnt As ImgXPrint
Set prnt = New ImgXPrint

Dim item As ImgXPrint_Printer
For Each item In prnt.Printers
    Debug.Print item.Name
Next

Set prnt = Nothing