2013-01-15 15:24:03小欽仔
VBA範例-757種之1(A-001)
A-001(Range物件)
取得已選擇之儲存格範圍
程式碼如下:
Option Explicit
Sub A_Sample001()
Dim myRng As Range
If TypeName(Selection) = "Range" Then
Set myRng = Selection
MsgBox myRng.Address '顯示位址
Else
MsgBox "沒有選擇儲存格" '選擇儲存格之外的物件時的訊息
End If
Set myRng = Nothing '釋放物件
End Sub