Excel VisualBasic Script

Public Sub SelectAndActivate()
  Range("B3:E10").Select
  Range("C5").Activate
End Sub