Greetings, Excel Experts!

I know just enough Excel to be considered marginal. I've recently been tasked to create a roster for the shelter I'm currently living in. Silly me . . . I thought that everything was easy to do in Excel. My goal is to be able to run this macro


Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim rng As Range
     
    Set rng = Range("E3")

    If Intersect(Target, rng) <> 0 Then

        If Range("E4:E11").EntireRow.Hidden = True Then

           Range("E4:E11").EntireRow.Hidden = False

        Else: Range("E4:E11").EntireRow.Hidden = True

        End If

    End If

    Target.Offset(-1, 0).Activate

End Sub
multiple times in this spreadsheet

https://drive.google.com/file/d/0B4b...it?usp=sharing

I ran it the first time and it worked like a charm. However, when I pasted the same macro directly underneath the initial one, the VB Editor immediately spat out that I had upset the Microsoft deities by saying something about an Ambiguous Error. So, the pilfered macro works for the Computer Lab in B6, but not for anything else.

I apologize to everyone who reads this post: I know I need to learn VBA but right now, I'm under the gun to get this spreadsheet completed.

Any and all help is truly and gratefully appreciated. Thank you for reading this. Mark