Updating a pivot table filter from a combo box on another sheet

I am trying to update apivot table filter with a combo box on another sheet. When it is changed I use a macro to fire off the code. Here is the code. Can anyone help?

Sub MacroSuperTeam()
'
' Macro1 Macro
'
        Sheets("Controls").PivotTables("PivotTable3").PivotFields("Super Team").CurrentPage = Range("e2").Text

'
End Sub