プリンタドライバ名を変更するには？ (ID:123749)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 APIを使わずとも、Win32_PrinterクラスのRenamePrinterメソッドで充分かも。 For Each W In GetObject("winmgmts:").InstancesOf("Win32_Printer") OldName = W.Name NewName = InputBox("新しい名前", "プリンタ名変更", OldName) If StrPtr(NewName) <> 0 Then Result = W.RenamePrinter(NewName) End If Next