Select a range and activate another
Public Sub SelectAndActivate() Range("B3:E10").Select Range("C5").Activate End Sub