Excel VisualBasic Script

Sub autoFilter()
     range("B3:D9").autoFilter
End Sub