1.4 Range(), .Activate, .Select, .Count

Private Sub WorksheetDemo02()

Dim ws As Worksheet
Dim Sheetname As String

Sheetname = "Sheet3"
Set ws = ActiveWorkbook.Worksheets(Sheetname)
ws.Activate
'ws.Range("A1").Select
ws.Range("A1:B10").Select
'ws.Range("A1:B10", "A8:C12").Select 'select by the range interest
'ws.Range(Rows(2), Rows(4)).Select
'ws.Range(Columns(2),Columns(3)).Select

'ws.select 'equals to ws.Activate

'MsgBox ws.Range("A1").Count
'MsgBox ws.Range("A1:b10").Count
'MsgBox ws.Range(Rows(2),Rows(4)).Count
'MsgBox ws.Range(Columns(2),Columns(3)).Count

End Sub

1. .Activate / .Select 指定一個儲存格或一個儲存格範圍，可使用 Select 方法。要將單個儲存格啟動為作用中儲存格，可使用 Activate 方法。
2. Range("cells" / column(#) / rows(#)) 指定範圍 (該指定範圍可包含一個或若干連續儲存格範圍) 或者某一立體範圍。
3. .Count 傳回一個 Long (長整數)，等於一個集合物件中的物件數目。
   Range(Rows(2),Rows(4)).Count 會傳回 3 (rows)