Beispiel zur Address-Eigenschaft

Im folgenden Beispiel werden vier unterschiedliche Darstellungen der gleichen Zelladresse in Sheet1 angezeigt. Die Kommentare geben die in den Meldungsfeldern angezeigten Adressen an.

Set mc = Worksheets("Sheet1").Cells(1, 1)
MsgBox mc.Address()                              ' $A$1
MsgBox mc.Address(RowAbsolute:=False)            ' $A1
MsgBox mc.Address(ReferenceStyle:=xlR1C1)        ' R1C1
MsgBox mc.Address(ReferenceStyle:=xlR1C1, _
    RowAbsolute:=False,     _
    ColumnAbsolute:=False,  _
    RelativeTo:=Worksheets(1).Cells(3, 3))        ' R[-2]C[-2]