- 帖子
- 58
- 主題
- 8
- 精華
- 0
- 積分
- 94
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- office 2003
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-12-6
- 最後登錄
- 2014-2-17
|
9#
發表於 2010-12-26 01:23
| 只看該作者
本帖最後由 gn00487767 於 2010-12-26 06:06 編輯
回復 2# Hsieh
Hsieh大大抱歉
小弟又要麻煩您了
我的問題有2個
第一個問題在附件裡
我的附件
第二個問題 就是您之前回覆我的列印表格的問題
01.Sub Ex()
02.Dim A As Range
03.With Sheets("資料表")
04.For Each A In .Range(.[A2], .[A2].End(xlDown))
05. With Sheets("表格")
06. .[E1] = A
07. .[C3] = A.Offset(, 1)
08. .[G3] = A.Offset(, 2)
09. .[C5] = A.Offset(, 3)
10. .[G5] = A.Offset(, 4)
11. .[C7] = A.Offset(, 5)
12. .[C9] = A.Offset(, 6)
13. .PrintOut '列印
14. End With
15.Next
16.End With
17.End Sub
其中
04.For Each A In .Range(.[A2], .[A2].End(xlDown))
紅色的A 是什麼意思 或是怎麼來的呀
因為我直接用你給我附件測試可以直接列印
但是我自己做一個新的工作表 複製您的程式碼 但是不能用呢
其他的我都弄清楚代表什麼意思或是該怎麼使用(修改)
就只有其中的A我無法理解
我也從您給我的附件中把A作修改 還是可以使用
就我自己做出來的工作表中的A無法辨別
還是說我做的是因為我把您的資料中[A2] 到[A2] 的儲存格參照放在C欄位的儲存格並且還有合併儲存格的關西呢
對了 他傳給我錯誤訊息 忘了是450還是405
可以幫幫小弟嗎
再次麻煩大大了 |
|