読者です 読者をやめる 読者になる 読者になる

アクティブプリンター名を表示させる

VBAでアクティブのプリンター名(とポート名)を取得する。

Sub ShowCurrentPrinterName()
MsgBox "現在使用しているプリンターは、" & _
Application.ActivePrinter _
& " です。", Title:="現在使用しているプリンターの表示"
End Sub