I recorded a macro that included showing a pivot field item.
I have to run the macro on different databases that have a unique field
item. There is only one field name in the field in a drop down box. How can
I change the code below to show the field item that is established when
creating the pivot table not the one that was created when I recorded macro

ActiveSheet.PivotTables("PivotTable1").PivotFields ("facilityid")
..CurrentPage = "60172"

When I run the macro on the next database in the current page maybe 60173,
60174, ... My macro will get a run time error because it can not find the
60172 item.

Hope this makes some sense and someone can help.

Thanks in advance.

C. Pete Straman

--
Message posted via http://www.officekb.com

Do you mean "ALL"

--
Regards,
Tom Ogilvy

"Pete Straman Straman via OfficeKB.com" wrote in
message ...
I recorded a macro that included showing a pivot field item.
I have to run the macro on different databases that have a unique field
item. There is only one field name in the field in a drop down box. How
can
I change the code below to show the field item that is established when
creating the pivot table not the one that was created when I recorded
macro

ActiveSheet.PivotTables("PivotTable1").PivotFields ("facilityid")
.CurrentPage = "60172"

When I run the macro on the next database in the current page maybe 60173,
60174, ... My macro will get a run time error because it can not find the
60172 item.

Hope this makes some sense and someone can help.

Thanks in advance.

C. Pete Straman

--
Message posted via http://www.officekb.com

If you need to show the item as selected in the dropdown:

With ActiveSheet.PivotTables(1).PivotFields("facilityid ")
.CurrentPage = .PivotItems(1).Value
End With


Pete Straman Straman via OfficeKB.com wrote:
I recorded a macro that included showing a pivot field item.
I have to run the macro on different databases that have a unique field
item. There is only one field name in the field in a drop down box. How can
I change the code below to show the field item that is established when
creating the pivot table not the one that was created when I recorded macro

ActiveSheet.PivotTables("PivotTable1").PivotFields ("facilityid")
.CurrentPage = "60172"

When I run the macro on the next database in the current page maybe 60173,
60174, ... My macro will get a run time error because it can not find the
60172 item.

Hope this makes some sense and someone can help.

Thanks in advance.

C. Pete Straman



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

Yes,

I meant All. But to get it off of ALL to the value below it. I have code
now that fixes PT1 but not PT2.
Still working on it. See my reply to posting help.
Thank you in advance for anything you have to offer.

Pete

--
Message posted via http://www.officekb.com