EPMExecuteAPI not being executed

Hi,

I'd like to temporarily disable the user option warning in a BPC10 report that it will contain many cells if refreshed. However, the following code does not change the user option setting for "Report Refresh - Warn if report exceeds n cells":

Sub SetWarning()

Application.Run "EPMExecuteAPI", "WarningIfQueryIsTooBig", , "False"

Rem Next row is to check the code as such is being executed

    Range("A1").Value = 1

End Sub

The value 1 is written to cell A1, so the code as such does execute. Also, I don't get any error message. We're on SP13, patch 3.

Any ideas?

/Cecilia