DirectPrecedents Property Example
This example selects the direct precedents of cell A1 on Sheet1.
Worksheets("Sheet1").Activate Range("A1").DirectPrecedents.Select