- 帖子
- 552
- 主題
- 3
- 精華
- 0
- 積分
- 578
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2015-2-8
- 最後登錄
- 2024-7-9
  
|
16#
發表於 2015-4-14 06:26
| 只看該作者
回復 15# idnoidno
For Each Rng In 工作表1.Range("B1", 工作表1.Cells(1, Columns.Count).End(xlToLeft).Address) '第一列"動態"讀取做循環
所謂的動態是指,當你儲存格有"增減"時仍可以依你的增減來做讀取,例如:只有甲乙丙3欄它就只做3次循環,若增加2欄則可以做5次 循環
上面 Rng 是儲存格(Range)的變數,
工作表1.Range("B1", 工作表1.Cells(1, Columns.Count).End(xlToLeft).Address) ,則是範圍意思是後B1這一欄開始到,Columns.Count是所有欄的數目,
End(xlToLeft).Address是從最後的儲存格尋找回來遇到的第一個有值的儲存格位址
還有當運行程序時剛開始最好用"F8"來一行一行看,大部份我只有用"區域變數視窗"監看變化 |
|