返回列表 上一主題 發帖

[發問] 請問關於預覽列印後,如何讓我選擇到底要不要列印呢?

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-6-6 17:53 | 只看該作者

[發問] 請問關於預覽列印後,如何讓我選擇到底要不要列印呢?

Sub 列印_收款單()

' 列印_收款單 巨集

    Sheets("收款單").Select
    Range("A1:AK61").Select
    ActiveSheet.PrintPreview '預覽列印
    Selection.PrintOut Copies:=1, Collate:=True '列印選取範圍
    Sheets("出餐單").Select
End Sub
收藏 分享

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
16  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2024-11-14 
2#
發表於 2015-6-7 09:33 | 只看該作者
Sub 列印_收款單()

' 列印_收款單 巨集

    Sheets("收款單").Select
    Range("A1:AK61").Select
...
starry1314 發表於 2015-6-6 17:53

這一行拿掉 :
Selection.PrintOut Copies:=1, Collate:=True '列印選取範圍

使用者若要印出直接點預覽畫面上方的 印表機圖示(或 "列印" 按鈕),

若不要列印則點 預覽視窗 的 X 按鈕關閉視窗 (或是上方的  "關閉" 按鈕) 即可.

TOP

starry1314
　暱稱: 豪

高中生Rank: 3Rank: 3

帖子
471 
主題
121 
精華
0 
積分
579 
點名
0  
作業系統
WIN10 
軟體版本
OFFICE2019 
閱讀權限
50 
性別
男 
註冊時間
2015-4-16 
最後登錄
2023-1-17 
3#
發表於 2015-6-7 10:22 | 只看該作者
回復 2# luhpro


    謝謝教學~腦筋轉不過來

TOP

        靜思自在 : 有願放在心裡，沒有身體力行，正如耕田不播種，皆是空過因緣。
返回列表 上一主題