I have a Workbook that has 2 worksheets, one called CALL QUERY and one called CALL LOG. On the CALL QUERY sheet, cell D9 is a user inputted cell with the cell validation set to list. The user uses the dripdown list to pick an office identifier (3-Letter Code).

On the CALL LOG sheet, I have info about individual calls. Column E has the 3-letter office identifier for each call.

I am trying to find a way to automatically auto filter the list on the CALL LOG sheet with the user input in cell D9 on the CALL QUERY sheet.

I was given the following code: (N2 is a cell on the CALL LOG sheet that equals the user inputted cell D9 on the CALL QUERY sheet)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Range("N2") = "" Then
      If ActiveSheet.FIlterMode Then
         ActiveSheet.ShowAllData
      End If
   Else
      Worksheets("Sheet1").Range("E:E).Autofilter _
         field:=1, _
         Criterial:=Range("N2").Value, _
         VisibleDropDown:=False
   End If
End Sub
I opened the VBA window using ALT-F11 and I double-clicked on the sheet that I wanted the auto filtering to apply to, and I entered this code. Once I closed the VBA window, I did multiple cahnges to the user inputted field and nothing happened on the auto filter sheet.

Is there something I am doing wrong? I was told this code works on the worksheet's SelectionChange event so whenever the user changes the input, it will autofilter the data. I am new to the SelectionChange event. Thanks for any help. - John