VBA Code For Pivot Table.

H

Heera

Hi,

I am doing a report and the user will have an option to select the
start date from which they want the data.
After creating a pivot table i want to exclude the dates which are
not
required.


For example i have data starting from 1-Apr-2008 and the user wants
the report from 5-Apr2008.


Here is the code which will remove the non required dates but this
code will remove only those dates which are mentioned
in the code but the user can select any date after 1-Apr-2008.


With ActiveSheet.PivotTables("PivotTable1").PivotFields("Audit Date")
.PivotItems("1-Apr-08").Visible = False
.PivotItems("2-Apr-08").Visible = False
.PivotItems("3-Apr-08").Visible = False
.PivotItems("4-Apr-08").Visible = False
End with


Can any one help me with the code which will remove the non required
dates till the start point.


Regards


Heera
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBA Code For Pivot Table. 1
delete selection in pivotcolumn 3
Pivot Table Filtering - Macro 3
Pivot table - unwanted lines 2
Dynamic Pivot Item Selection 1
VBA, Macros and Pivot Tables 1
Pivot Table Errors 0
VBA Pivot Table: Determining item from one field based on anotherfield item 0

Top