Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Pivot Table Blues
Message
General information
Forum:
Microsoft Office
Category:
Excel
Miscellaneous
Thread ID:
00581727
Message ID:
00588722
Views:
24
>I've got this Pivot Table with one pagefield. I want to print out each item in that page field. How do I access those values thur a macro and/or find out how many there are?
>
>TIA
>Jeff
    Dim rgLast As Range
    Set rgLast = Range("A1").SpecialCells(xlCellTypeLastCell)       ' Get the last col & Row
    Dim iLRow As Long, iLCol As Long
    iLRow = rgLast.row                                              ' assign the last row
    iLCow = rglast.Column                                           ' assign the last col
After this you will be able to reference the values like any other sheet by looping through your desired range.
~Joe Johnston USA

"If ye love wealth better than liberty, the tranquility of servitude better than the animated contest of freedom, go home from us in peace. We ask not your counsel or arms. Crouch down and lick the hands which feed you. May your chains set lightly upon you, and may posterity forget that ye were our countrymen."
~Samuel Adams

Previous
Reply
Map
View

Click here to load this message in the networking platform