ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Pivot Table issue (https://www.excelbanter.com/excel-programming/275641-pivot-table-issue.html)

PEdro

Pivot Table issue
 
Hi
I have a pivot table and need to know which code should I write in order to
change a RowField by another on the database but, whithout knowing the
existing selected rowfield

Regards
Pedro



PEdro

Pivot Table issue
 
Tom are you able to help me on this?

Regards

Pedro

"Pedro" wrote in message
...
Hi
I have a pivot table and need to know which code should I write in order

to
change a RowField by another on the database but, whithout knowing the
existing selected rowfield

Regards
Pedro





Mark Bigelow

Pivot Table issue
 
I'm not sure what you mean? Can you be more specific or provide an
example of what you want to do?

Mark

---
Mark Bigelow
mjbigelow at hotmail dot com
http://hm.imperialoiltx.com

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

PEdro

Pivot Table issue
 
I have in the Row Field "Segment Name" I want to write a code in order to
replace the field by "Currency" but whithout taking into account the name of
the existing. Next time I might have another field name and replace by
Currency


"Mark Bigelow" wrote in message
...
I'm not sure what you mean? Can you be more specific or provide an
example of what you want to do?

Mark

---
Mark Bigelow
mjbigelow at hotmail dot com
http://hm.imperialoiltx.com

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!




Mark Bigelow

Pivot Table issue
 
This should do it:

' This variable tells which position the field is in
' First position is 0
intFieldPos = 0
ActiveSheet.PivotTables("PivotTable1").PivotFields (intFieldPos).Orientat
ion = _
xlHidden
With ActiveSheet.PivotTables("PivotTable1").PivotFields ("Currency")
.Orientation = xlRowField
.Position = intFieldPos
End With

Let me know if this doesn't work.

Mark

---
Mark Bigelow
mjbigelow at hotmail dot com
http://hm.imperialoiltx.com

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!


All times are GMT +1. The time now is 09:01 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com