I have a command button on a sheet that is supposed to look through 3 sheets
and refresh pivottables. for some reason it's giving me a runtime error.

Here's the code I'm using

Sub CommandButton1_Click()

Sheets("Cert Tracking YTD Totals").Select
ActiveSheet.PivotTables("CT_Totals").RefreshTable
ActiveSheet.PivotTables("CT_Losses").RefreshTable
ActiveSheet.PivotTables("CT_Product_Totals").Refre shTable
ActiveSheet.PivotTables("CT_Product_Losses").Refre shTable

Sheets("Cert Tracking Monthly Total").Select
ActiveSheet.PivotTables("CT_Monthly_Totals").Refre shTable
ActiveSheet.PivotTables("CT_Monthly_Losses").Refre shTable

Sheets("CertTracking Monthly Prod Tot").Select
ActiveSheet.PivotTables("CT_Monthly_Prod_Totals"). RefreshTable
ActiveSheet.PivotTables("CT_Monthly_Prod_Losses"). RefreshTable

Sheets("Cert Tracking YTD Totals").Select
Range("A1:C2").Select

End Sub

Can someone tell me whats wrong? If its any help, i originally created the
code in excel 2K and i'm trying to edit it in excel97.

thanks