如何判別哪台電腦後,去選擇正確的印表機路徑

請問各位前輩

我製作了一個方塊按鈕,
按了可以快速列印該儲存格的內容,
===============================
Sub 列印指定印表機B2B3()

ActiveSheet.PageSetup.PrintArea = "$B$2:$B$3"
Application.ActivePrinter = "TSC TTP-344M Pro on Ne00:"
ActiveWindow.SelectedSheets.PrintOut Copies:=[c2], Collate:=False, _
IgnorePrintAreas:=False
End Sub
===============================
可是那是僅限於A電腦的印刷機,
想請問此檔案如何能夠拿到B、C、D..電腦,
也能夠自動判斷因為非A電腦..
所以路徑從本機印刷機,改為區網連到A機的印刷機呢??
麻煩各位前點指點一下,
感激不盡
2024-01-03 23:54 發佈
blighter wrote:
想請問此檔案如何能夠拿到B、C、D..電腦,
也能夠自動判斷因為非A電腦..

第一個想到的是用電腦名稱來判斷,使用電腦名稱 Environ$("ComputerName") 依目前電腦名稱來做選擇。
blighter
blighter 樓主

謝謝分享,我再爬文看看編寫方式

2024-01-04 23:29
blighter
blighter 樓主

小弟功力太淺...看不太懂...不過會再努力研讀看看..謝謝分享 Orz

2024-01-04 23:28
blighter wrote:
想請問此檔案如何能夠拿到B、C、D..電腦,也能夠自動判斷因為非A電腦..所以路徑從本機印刷機,改為區網連到A機的印刷機呢??


在 B、C、D..電腦設定同名印表機,在印表機連線設定為網路連線
blighter
blighter 樓主

謝謝分享,但由於A.B.C.D...等等其實各有不同標籤機,不同功能.....但又會互相使用到..所以如果用這個方法..每台電腦的檔案都需要重新編寫..比較不能是一個檔案就能解決了

2024-01-04 23:26
內文搜尋
X
評分
評分
複製連結
Mobile01提醒您
您目前瀏覽的是行動版網頁
是否切換到電腦版網頁呢?