Hi:

I am using Excel 2003 and I need to protect a worksheet, but allowing users
to interact with a OLAP Pivot Table... i mean, with drillup/drilldown and
dice/slice functionality

I try with the next code in my workbook

Private Sub Workbook_Open()
ActiveSheet.EnableSelection = xlNoRestrictions
ActiveSheet.EnablePivotTable = True

ActiveSheet.Protect Password:="ABC", UserInterfaceOnly:=True,
AllowFormattingCells:=True, AllowFormattingColumns:=True,
AllowFormattingRows:=True, AllowUsingPivotTables:=True

ActiveSheet.PivotTables("Table1").RefreshTable
End Sub

But, when i try to drill-down or drill-up over the Pivot Table... i get the
next message:

"The Data Source in this PivotTable require a refresh..." or something like
that...

Any idea
Thanks
Rodrigo