ActivePrinter

使用しているプリンターの名前を取得または設定します。

構文
Application.ActivePrinter
引数
戻値

プログラム実行例

アクティブプリンターの名前を取得

DIM Excel = CREATEOLEOBJ("Excel.Application")
Excel.Visible = TRUE

PRINT Excel.Application.ActivePrinter

Excel.Application.DisplayAlerts = FALSE
Excel.Quit
  1. script.function.CREATEOLEOBJ(1)
  2. com.Excel.Application.Visible(2)
  3. com.Excel.Application.ActivePrinter(4)
  4. com.Excel.Application.DisplayAlerts(6)
  5. com.Excel.Application.Quit(7)
結果
Brother DCP-J963N Printer on Ne03: