|
| If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|||||||
|
|
Thread Tools | Display Modes |
|
#1
June 4th, 2009, 07:32 AM
posted to microsoft.public.excel.misc
|
|||
|
|||
Need a Error Handling for this Macro
Please help.
I have this Macro. But the problem starts when there is no data in the pivot table or no data in the data source. It will prompt a run time error 1004. Private Sub Worksheet_Activate() Me.PivotTables(1).PivotCache.Refresh Range("C1").Activate End Sub I believe there is a way to exit this sub if running this sub causes an error. Thanks. 
|
|
#2
June 4th, 2009, 07:51 AM
posted to microsoft.public.excel.misc
|
|||
|
|||
|
Need a Error Handling for this Macro
Private Sub Worksheet_Activate()
On Error Resume Next Me.PivotTables(1).PivotCache.Refresh Range("C1").Activate End Sub -- If this post helps click Yes --------------- Jacob Skaria " wrote: Please help. I have this Macro. But the problem starts when there is no data in the pivot table or no data in the data source. It will prompt a run time error 1004. Private Sub Worksheet_Activate() Me.PivotTables(1).PivotCache.Refresh Range("C1").Activate End Sub I believe there is a way to exit this sub if running this sub causes an error. Thanks.
|
|
#3
June 4th, 2009, 07:58 AM
posted to microsoft.public.excel.misc
|
|||
|
|||
|
Need a Error Handling for this Macro
Thanks... it works.
"Jacob Skaria" wrote: Private Sub Worksheet_Activate() On Error Resume Next Me.PivotTables(1).PivotCache.Refresh Range("C1").Activate End Sub -- If this post helps click Yes --------------- Jacob Skaria " wrote: Please help. I have this Macro. But the problem starts when there is no data in the pivot table or no data in the data source. It will prompt a run time error 1004. Private Sub Worksheet_Activate() Me.PivotTables(1).PivotCache.Refresh Range("C1").Activate End Sub I believe there is a way to exit this sub if running this sub causes an error. Thanks.
|
| Thread Tools | |
| Display Modes | |
|
|
Linear Mode
