Think this is what you're after...
Note: the following code would offset from B1, C1. If you wanted the offset to be from B5, C5, edit accordingly.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
****If Target.Count > 1 Then Exit Sub
****If Not Intersect(Target, [B1]) Is Nothing Then [B1].Offset([B5].Value).Select
****If Not Intersect(Target, [C1]) Is Nothing Then [C1].Offset([C5].Value).Select