- 帖子
- 552
- 主題
- 3
- 精華
- 0
- 積分
- 578
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2015-2-8
- 最後登錄
- 2024-7-9
  
|
2#
發表於 2015-7-24 11:09
| 只看該作者
本帖最後由 lpk187 於 2015-7-24 11:11 編輯
回復 1# woodyliu
我提供下列各種寫法,你用F8逐行的執行看看,在觀看的過程中請打開"區域變數視窗"來觀察變數的變化會更瞭解的
- Public Sub Ex()
- aa = Cells(Rows.Count, 1).End(xlUp).Row
- Range("A1:B" & aa).Select
- aa = Cells(Rows.Count, 1).End(xlUp).Address
- Range("A1:" & aa).Select
- aa1 = Cells(1, 1).End(xlDown).Row
- Range("A1:B" & aa1).Select
- aa1 = Cells(1, 1).End(xlDown).Address
- Range("A1", aa1).Select
- bb = Cells(Rows.Count, 2).End(xlUp).Row
- Range("A1:B" & bb).Select
- bb = Cells(Rows.Count, 2).End(xlUp).Address
- Range("A1", bb).Select
- bb1 = Cells(1, 2).End(xlDown).Row
- Range("A1:B" & bb1).Select
- bb1 = Cells(1, 2).End(xlDown).Address
- Range("A1", bb1).Select
- End Sub
複製代碼 |
|