No.1
Address是Range對象的一個重要屬性，而用好這個屬性也是學習vba編程一個必修課。
本章介紹關於Address的一些參數功能，對於全面了解和學習Range地址尋址方面十分必要。
Address英譯為地址。
對於二維表操作，地址定位十分關鍵，也是對數據進行檢索的途徑。
下圖為Address語法和參數：
通常情況下，我們只要對Address屬性以默認方式使用就足夠使用。
RowAbsolute TRUE 絕對引用性
ColumnAbsolute TRUE 絕對引用列
ReferenceStyle -4150 引用樣式
External FALSE 本地引用
但是想使用不同的方式來表現地址，就需要對以上參數進行設置。
下圖為設置不同參數進行的一個地址顯示。
No.2
可以看到上圖為默認值A1樣式顯示地址。
下圖為 R1C1 樣式顯示址。
很顯然是有所不同的。在編程過程中分別區分這兩種樣式，根據不同的需要進行設置。
設置參數為：ReferenceStyle:=xlA1和ReferenceStyle:=xlR1C1
No.3
示例代碼
下圖為本節示例代碼
顯示地址按鈕代碼
Private Sub CommandButton1_Click()Dim r As Range, ad As StringSet r = ThisWorkbook.ActiveSheet.Range("C3")With ThisWorkbook.ActiveSheet.SelectMsgBox "Address屬性選擇：" & VBA.vbCrLf _& "ReferenceStyle:" & r.Offset(3, 0).Value & VBA.vbCrLf _& "Rowabsolute:" & r.Offset(1, 0) & VBA.vbCrLf _& "Columnabsolute:" & r.Offset(2, 0) & VBA.vbCrLf _& "External:" & r.Offset(4, 0)ad = Selection.Address(ReferenceStyle:=r.Offset(3, 0).Value _, Rowabsolute:=r.Offset(1, 0).Value _, columnabsolute:=r.Offset(2, 0).Value _, external:=r.Offset(4, 0).Value)ThisWorkbook.ActiveSheet.Range("A9") = adEnd WithEnd Sub
Address屬性使用很普遍，在編程過程中也不可避免。
所以，要全面掌握這個屬性以及參數的的使用方法，對熟悉使用地址進行編程是一個十分重要的內容。
通過以上例子可以很方便地對不同的參數有一個明確的了解。
歡迎關注、收藏