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