[發問] 按下Command Button後，執行 按下鍵盤Ctrl +P

av8d

當鍵盤按下F1後做，如下
Application.OnKey "{F1}"

當按下Command Button1後，執行 按下鍵盤Ctrl +P
或
當按下Command Button1後，執行 列印動作

以上該如何做？

owen06

回復 1# av8d


    Application.Dialogs(xlDialogPrint).Show

av8d

回復 2# owen06


    謝謝大大~
想再請教一下~
如果要有預覽圖那種的話也可以嗎?

owen06

回復 3# av8d


    Application.Dialogs(xlDialogPrintPreview).Show

av8d

回復 4# owen06


    學習到了兩種~誠心感謝

owen06

回復 5# av8d


    不客氣，其實我也是用猜的，我是先用錄製巨集的方式，把動作給錄下來，
    產生出來的內容自己去TRY，
    其實好像這樣就行了 ActiveSHEET.PrintPreview
   
    而Application.Dialogs(xlDialogPrintPreview).Show
    這方法是我之前錄製巨集去錄『傳送到郵件』產生的內容『xlDialogSendMail』下去改的，
    我想XLDIALOG應該都是固定的，所以我就試著把後面的內容改看看，就成功了，
    下次如果有遇到不會的地方，可以試著用錄製巨集去看看裡面的內容，
    再自行修改看看，通常可以解決掉不少困難。

Hsieh

回復 5# av8d
ActiveSheet.PrintPreview '預覽列印
ActiveSheet.PrintOut '直接列印

av8d

回復 7# Hsieh


    謝謝H大~
我剛有研究一下~

Application.Dialogs(xlDialogPrint).Show arg1:=1, arg2:=2, arg3:=3

'arg1=份數,arg2=列印範圍開始頁,arg3=列印範圍結束頁