チェックするとこのマクロを実行するチェックボックスがあります。チェックボックスはシート1にあり、シート2の行11を非表示にします。シート間を行き来する必要がないように、このコードをどのように記述すればよいですか?
Sub Hide_HeaterTreater_Rows()
Sheets("NSR Report").Select
Range("11:11").Select
If Selection.EntireRow.Hidden = False Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
Sheets("NSR FORM").Select
End Sub