小欽仔的電腦學習日誌Blog 2010/5/29 小欽仔為了不想把一些關於電腦所學的一些知識給淡忘掉， 所以決定開啟一個Blog給自己跟身邊的朋友來記錄與分享關於小欽仔遇到及學習得電腦知識。 也歡迎大家有問題的來提問~~~一起磨練成長!!

7愛的鼓勵 0訂閱站台

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