Error 1004 - Application defined or object defined error for pvFld.PivotFilters.Add2 xlSpecificDate, , strFilter

[Saab95]

Hi there,

I seek for your help again.

I have 2 excels where I have the same VBA, for one no issue, for the second one I get a 1004 error.

in here

Any idea ?

Thank you

 

[Alex Blakenburg]

What happens if you add this line before your Add2 line(s) ?

pvFld.ClearAllFilters

 

[Saab95]

What happens if you add this line before your Add2 line(s) ?

pvFld.ClearAllFilters

Alex,

Same error.

 

[Alex Blakenburg]

Can you start with showing us what the pivot table looks like and also what is in Main B3 (have the cursor in B3 and include the formula bar in what you show).

 

[Saab95]

Can you start with showing us what the pivot table looks like and also what is in Main B3 (have the cursor in B3 and include the formula bar in what you show).

VBA doesn't wotk because the field I want to update is in the "Filters" section of the pivot field.

If I move it to the "Rows" section then VBA works. But this is not what I want.

Anyway to update it with VBA even if is in the "Filters" section ??

 

[Alex Blakenburg]

VBA doesn't wotk because the field I want to update is in the "Filters" section of the pivot field.

That's why it is always useful to give us some visibility of your data.

Try this:

pvFld.ClearAllFilters
pvFld.CurrentPage = CDate(strFilter)

 

[Saab95]

That's why it is always useful to give us some visibility of your data.

Try this:

pvFld.ClearAllFilters
pvFld.CurrentPage = CDate(strFilter)

Alex,

Works perfectly. Thank you for your support-

 

[Alex Blakenburg]

You're welcome. Glad we could help.