Setting a text box value in a filter

[perbags]

Can anyone help me with this please.

I am setting up a filter and what I need is the value from a text box that is entered to be searched in column C, This is the code I come up with so far but I cant get it to work..

Thanks for your help.

Perbags

Private Sub CommandButton1_Click()


 Dim Site As String
    
    TextBox1.Text = Site
    
  Sheets("Sitedata").Select
   Range("A2").Select
   Range("2:2000").AutoFilter 3, "<>(Site)"
      

End Sub