暱稱: 沙拉油 頭銜: 正港A水電工
超級版主
- 帖子
- 44
- 主題
- 2
- 精華
- 0
- 積分
- 49
- 點名
- 0
- 作業系統
- Windows XP SP3
- 軟體版本
- Office 2003
- 閱讀權限
- 150
- 性別
- 男
- 來自
- 呆丸
- 註冊時間
- 2010-5-1
- 最後登錄
- 2013-1-27
 
|
像上圖這樣嗎？
把你上圖貼的程式碼，這部分- Set rng = Sheets("Sheet2").Range("B65536").End(xlUp).Offset(1, 0)
- rng = Sheets("Sheet1").Range("A1")
- rng.Offset(0, -1) = Time
- Set rng = Sheets("Sheet2").Range("A65536").End(xlUp).Offset(1, 0).Resize(1, 4)
- With Sheets("Sheet1")
- rng = Array(Time, .[A1], .[B2], .[C2])
- End With
|
|
發表於 2010-12-7 16:21
| 