標題: [發問] 多工作表SHEET選擇SHEET列印之問題請教 [打印本頁]

---

作者: rouber590324    時間: 2015-7-13 14:17     標題: 多工作表SHEET選擇SHEET列印之問題請教

DEAR ALL 大大
1.多工作表SHEET選擇SHEET列印之問題請教 - 說明如下
  1.1 SHEET1 為列印工作表畫面
          SHEET2 - SHEET10為 需選擇性列印之工作表
       1.1.1 如何於 SHEET1 列印工作表畫面執行一自訂功能鍵後秀出  SHEET2-SHEET10需列印之工作表中文名稱
                    供經辦選取需列印之工作表與可一次ALL列印之工作表功能鍵.
           1.1.1.1 例-經辦可自行選取列印 SHEET2  SHEET4  SHEET10  或  選取 ALL列印
2.煩不吝賜教  THANKS   *10000

---

作者: rouber590324    時間: 2015-7-14 11:10

小弟研究後先於儲存格選取工作表是否列印後再執行如下-已可運作THANKS
Sub Ex()
    Dim i As Integer
    For i = 2 To 5
    If Sheet1.Cells(i, 3) - 1 = 0 Then
    Sheets(i).PrintOut
    End If
    Next
    If Sheet1.Cells(1, 1) - 0 = 0 Then
    MsgBox "需選取列印工作表名稱後方可執行列印"
    End If
End Sub

---

作者: Farnsworth    時間: 2015-7-14 17:28

回復 2# rouber590324

我試過了，旦程序出錯，我找不出原因啊！

---

作者: Hsieh    時間: 2015-7-14 21:56

回復 2# rouber590324

試試看附件
[attach]21384[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)