Toggle Button to hide/unhide rows based on value

In column C, I have values of Y and N. I want to hide rows that have a Y in column C. The caption will be "Hide Received", which will be all rows that have a Y in column C. And "Show All" which will show all rows (this will include values with Y and N) I have written the following code, but cannot seem to get it to work.

Does anybody know how to write the code for this? Many thanks!

Private Sub ToggleButton1_Click()
    With Me
        If .ToggleButton1.Value = False Then
            If .AutoFilterMode Then .UsedRange.AutoFilter
            .ToggleButton1.Caption = "Hide Received"
        Else
            .UsedRange.Columns(3).AutoFilter Field:=1, Criteria1:="<>Y"
            .ToggleButton1.Caption = "Show All"
        End If
    End With
End Sub

Hello therealaccountant,

Welcome to this forum!

Your post does not comply with Rule 2 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html

Regards.