VBA Userformをプリントアウトする時にプリンターを選択する方法
失敗するやり方 Excel のシートをプリントアウトする際、特定のプリンターを指定してプリントアウトする方法があります。 よく知られている方法です。 Dim 元のプリンター As String
元のプリンター = Application.ActivePrinter
Application.ActivePrinter = "Microsoft Print to PDF on Ne01:"
ActiveSheet.Printout
Application.ActivePrinter = 元のプリンター 現在のアクティブプリンター名を取得して、いったん変数に入れておき、アクティブプリンターを、別のプリンターに切り替えます。そして、印刷を実行した後、アクティブプリンターを元に戻す、というやり方です。 驚くべき事に、このやり方、UserformのPrintform メソッドでは通用しません。 なぜなら、UserformのPrintformで使われるプリンターはWindowsの既定のプリンター以外に選択できないからです。 まさかと思いましたが、本当にそうでし