Enable Command Bar
Application.CommandBars("PivotTable").Visible = True
Application.CommandBars("PivotTable").Enabled = True
"mathel" wrote:
I am using Excel 2003 and created a Pivot report to be used by multiple
users. Periodically, the data needs to be refreshed. The 'Pivot Table'
command bar was not loading when other users opened the file, so I added the
following in the WB code:
Private Sub Workbook_Open()
Application.CommandBars("PivotTable").Visible = True
End Sub
The command bar now loads, however, is greyed out for the other users. What
can be added to this sub-routine to enable this command bar?
Any suggestions greatly appreciated.
--
Linda
|