Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, [SelectedSheet]) Is Nothing Then
Sheets([SelectedSheet].Value).Activate
End If
End Sub
Option WHERE?Also followed your instructions and nothing happens when I select an option.