Board logo

標題: [發問] range()內語法問題 [打印本頁]

作者: caichen3    時間: 2012-5-8 13:33     標題: range()內語法問題

想請問各位大大,像是下列紅色字體Range("c3")儲存格會因為插入列、行而變動的話,該如何寫呢??
a=range("B1").value   '插入行數
a預設為3,更改為5
若a值更改,原先設定U範圍[C3]至最後,改為[E3]至最後
請問該如何寫range括號內的格式呢????
For Each U In Range([C3], [C3].End(xlDown))
   .....      
   .....
Next
作者: kevin681024    時間: 2012-5-8 13:41

回復 1# caichen3
  1. 改成
  2. For Each U In Range(Cells(3, a), Cells(3, a).End(xlDown))這樣呢?
複製代碼

作者: GBKEE    時間: 2012-5-8 13:56

回復 1# caichen3
a=range("B1").value   '插入行數,a預設為3,更改為5
For Each U In Range([C3], [C3].End(xlDown))  

[C3].End(xlDown) 要視工作表[C3] 往下儲存格的資料是否連續有關  不一定會是 3 或 5
  1. For Each u In [C3].Resize( a)    試試看這是你要的嗎
  2.        MsgBox U.Address
  3. Next
複製代碼

作者: caichen3    時間: 2012-5-8 14:37

感謝大大們的大力幫助




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)