作者prince1224 (網球王子)
看板Visual_Basic
標題[VBA ] 請教Set Rng 的語法
時間Thu May 5 22:32:28 2011
Dim Rng As Range, T As Date
T = Time
With Sheets("Sheet2")
第一句同左 Set Rng = .Cells(2, Columns.Count).End(xlToLeft).Offset(, 1)
Rng.Resize(, 2) = T
第二句同左 Rng.Offset(1).Resize(3, 2) = Sheets("Sheet1").Range("C1").Resize(3, 2).Value
Rng.Resize(, 2).EntireColumn.AutoFit
想請教一下第一、二句語法在表達什麼
請知道的人回答，拜託了，謝謝^^
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.115.177.222
1F：→ sueadolph:這是考試題目，還是書本的範例，為什麼有人這樣子寫XD 05/06 00:45
2F：→ sueadolph:感覺是考驗對方懂不懂 rng的一些活用法(?) 05/06 01:00
3F：→ sueadolph:第一句，說白點，就是第二列有值的最後一個，選右邊那個 05/06 01:02
4F：推 sueadolph:第二句是以這一格 向下一格後 resize成2x3, 並將c1:d3的 05/06 01:07
5F：→ sueadolph:值，填入至resize後的rng中 05/06 01:10
6F：→ MOONRAKER:表達哩，原來電腦語言可以當國文唸啊 05/06 08:45
7F：→ MOONRAKER:錄下來的macro才有這麼迂迴的 05/06 08:46
8F：推 sueadolph:錄的不會有Set Rng 這種XD 05/06 21:00