Next Property Example

This example selects the next unlocked cell on Sheet1. If Sheet1 is unprotected, this is the cell immediately to the right of the active cell.

Worksheets("Sheet1").Activate
ActiveCell.Next.Select