troubleshooting Question

Error when pivot table is empty

Avatar of rmc71291
rmc71291 asked on
Visual Basic ClassicMicrosoft Excel
2 Comments1 Solution73 ViewsLast Modified:
I have the following code in an excel spreadsheet.

Sub RefreshReport(control As IRibbonControl)
    Worksheets("Order Report").Activate
    ActiveSheet.PivotTables("Order Report").PivotSelect "'Item Description'[All]", _
        xlLabelOnly, True
    ActiveSheet.PivotTables("Order Report").PivotCache.Refresh
End Sub

The problem is, when this spreadsheet is first used, likely the pivot report would be empty.  This means when I run this code, I get an error stating, "Run-time error '1004':  The formula is not complete.  Make sure and ending square bracket ] is not missing."  I know this error is related to an empty pivot table because anytime I test it where the pivot report would show at least one line item, the error never appears.  On debug, lines 3 and 4 are highlighted.

Could anyone recommend some type of if/then statement that could check to see if the report would be empty and if YES, then maybe throw a message stating, "Report Empty"?

Please let me know if you need more information to help me solve this issue.  If it helps, the conditions for there to be a report is if in the tab called "Main" then Column Q from row 2 to 9999 must have a numerical value in it and cannot be blank.

I will apologize up front if I'm not using correct code or excel language.  I'm not very good with this stuff.
Join our community to see this answer!
Unlock 1 Answer and 2 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 2 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros