BExAnalyzer: SAPBEXsetFilterValue and others: runtime error 1004, Intersect

Question

Hello there,
any idea why e.g. SAPBexSetFilterValue does not work any more in BI7.0?
We need to set serveral filter values by macro which worked like a charme in BW3.5.
Now, all functions that have to to with filter values cause a runtime error 1004, saying that the intersect-property of the application object could not be assigned.
Does anyone have the same problem or even a solution or just a snipplet of working code (set or get a filter value).
As far as I've found out, the drill-down-functions may cause the same problem.
Any hints are welcome. Thank you.

Answer 1

Sure, here it is. Simple enough, but not working no matter what I try:
Dim result As Long
    ' last parameter (atCell) left out. Cursor placed on filter cell for costcenter. If you have a look
    ' at the API, then the ActiveCell will be used in that case. This worked quite good in BW 3.5
    result = Run("SAPBEXSetFilterValue", "DE00DECCR10000", "0HIER")
    ' The statement above will call the following code inside the API:
    '    Public Function SAPBEXsetFilterValue(intValue As String, Optional hierValue As String, Optional atCell As Range) As Integer
    '      extErrorBegin ("3.x API SAPBEXsetFilterValue called")
    '      If atCell Is Nothing Then Set atCell = Application.ActiveCell
    '      SAPBEXsetFilterValue = paddin.SAPBEXsetFilterValue(ActiveWorkbook.Name, intValue, hierValue, atCell)
    '      extErrorEnd
    '    End Function
    ' No matter if I use my statement (Run(...)) or call the API statement directly, I always receive a runtime error '1004',
    ' saying that the intersect-property of application-object could not be assigned.
SAPBEXSetFilterValue worked like a charme in BW3.5. We used it in several workbooks for automation and this becomes a really big problem now in BW7.0.
Any help/idea welcome!