Address Property

Microsoft Excel Visual Basic

ShowAddress property as it applies to the Hyperlink object.

Returns or sets the address of the target document. Read/write String.

expression.Address

expression    Required. An expression that returns one of the above objects.

ShowAddress property as it applies to the Range object.

Returns the range reference in the language of the macro. Read-only String.

expression.Address(RowAbsolute, ColumnAbsolute, ReferenceStyle, External, RelativeTo)

expression    Required. An expression that returns one of the above objects.

RowAbsolute   Optional Variant. True to return the row part of the reference as an absolute reference. The default value is True.

ColumnAbsolute   Optional Variant. True to return the column part of the reference as an absolute reference. The default value is True.

ReferenceStyle   Optional XlReferenceStyle.

XlReferenceStyle can be one of these XlReferenceStyle constants.
xlA1 default. Use xlA1 to return an A1-style reference.
xlR1C1. Use xlR1C1 to return an R1C1-style reference.

External   Optional Variant. True to return an external reference. False to return a local reference. The default value is False.

RelativeTo   Optional Variant. If RowAbsolute and ColumnAbsolute are False, and ReferenceStyle is xlR1C1, you must include a starting point for the relative reference. This argument is a Range object that defines the starting point.

Remarks

If the reference contains more than one cell, RowAbsolute and ColumnAbsolute apply to all rows and columns.

Example

The following example displays four different representations of the same cell address on Sheet1. The comments in the example are the addresses that will be displayed in the message boxes.

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]