執行 VBA 程式會出現 printout 方法失敗的錯誤訊息 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 執行 VBA 程式會出現 printout 方法失敗的錯誤訊息

返回列表下一主題上一主題發帖

[發問] 執行 VBA 程式會出現 printout 方法失敗的錯誤訊息

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

1^# 跳轉到 »

發表於 2013-12-19 09:11 | 顯示全部帖子

A6和A10分別設定要開發票的範圍，當我按下 command button 之後會自動將 summary 工作表的資料，自動填入到 ...
aer 發表於 2013-12-19 08:17

你的附件內容是空的。

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

2^#

發表於 2013-12-19 18:13 | 顯示全部帖子

回復 3# aer
執行起來一切都正常啊！

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

3^#

發表於 2013-12-20 10:09 | 顯示全部帖子

回復 6# aer
是不是這樣？

Sub Ex()
Dim xi As Long
With Worksheets("Invoice")
.Activate
Sheets("summary").Range("D" & .Range("A6").Value + 1 & ":G" & .Range("A10").Value + 1).Copy _
Destination:=.[C6]
' .PrintOut
.PrintOut from:=1, To:=1, copies:=1
End With
End Sub

複製代碼

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

4^#

發表於 2013-12-21 09:04 | 顯示全部帖子

本帖最後由 c_c_lai 於 2013-12-21 09:05 編輯

回復 8# aer
因為昨天早上朋友剛好來電，要與他吃飯，
高興之餘忘了將它移除掉就急忙傳出，歹勢！

靜思自在 : 對父母要知恩，感恩、報恩。

返回列表下一主題上一主題