- 帖子
- 31
- 主題
- 6
- 精華
- 0
- 積分
- 37
- 點名
- 0
- 作業系統
- Vista
- 軟體版本
- Office 2003
- 閱讀權限
- 10
- 性別
- 男
- 來自
- HK
- 註冊時間
- 2010-10-31
- 最後登錄
- 2017-10-26
|
For i = 2 To [a65536].End(3).Row
Cells(i, 1).Resize(, 4).Copy Sheets(Cells(i, 1).Value).[a65536].En ...
oobird 發表於 2010-10-31 09:28 
謝謝, 以後節省了做表的不少時間~ |
|