Returns a Range object that represents the range containing all the direct precedents of a cell. This can be a multiple selection (a union of Range objects) if there's more than one precedent. Read-only Range object.
Syntax
expression.DirectPrecedents
expression A variable that represents a Range object.
Remarks
The DirectPrecedents property only works on the active sheet and cannot trace remote references.
Example
This example selects the direct precedents of cell A1 on Sheet1.
Worksheets("Sheet1").Activate
Range("A1").DirectPrecedents.Select