掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
VB6で指定したプリンタから印刷するには (ID:139724)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
VB6からExcelを開く、そのExcelファイルを指定したプリンタで印刷したいと おもっているのですが、うまく行かないのでご教授お願いします。 PrintOutの引数の中にプリンタを指定できるようなのでやってみましたが駄目でした。 よろしくお願いします Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Dim PT As Printer Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open(App.Path & "\test.xls") Set xlSheet = xlBook.Worksheets(1) 'プリンタを指定 PT = "EPSON PM-3700" xlSheet.PrintOut (PT)
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.