Hi Leute,
ich habe folgendes Problem:
Hi Leute ich möchte gerne einer ComboBox die verfügbaren Drucker zuweisen. Kann mir vielleicht jemand sagen wie das geht?
LG
Peter
hi gerd,
vielen dank für deine antwort. wie kann ich nun die angezeigten drucker in mein makro übernehmen?
vielen dank!
gruß peter
AW: Drucker auflisten
04.05.2006 22:31:54
Nepumuk
Hallo Peter,
versuch es so:
PublicSub test4() 'Druckerauflistung Dim objWMI As Object, objItem AsObject Set objWMI = GetObject("winmgmts:\\.\root\cimv2"). _ ExecQuery("Select * from Win32_Printer") For Each objItem In objWMI Debug.Print objItem.Name Next Set objWMI = Nothing EndSub
hi nepumuk,
vielen dank für deine antwort.
lg peter
AW: Drucker auflisten
04.05.2006 22:33:00
Gerd
Hi,
wozu, du kannst da den Drucker direkt auswählen.
mfg Gerd
AW: Drucker auflisten
04.05.2006 22:56:19
peter
hi,
ich mache das programm nicht für mich sondern im rahmen meiner diplomarbeit und mein betreuer möchte das gerne über eine benutzerdefinierte userform wo die druck einer combobox zugewiesen werden!
vielen dank!
lg peter