ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Excel Program Glitch? (https://www.excelbanter.com/excel-programming/301054-excel-program-glitch.html)

Todd huttenstine

Excel Program Glitch?
 
Why will it not let me use any of the below methods to
hide pivotfield "Percent Overdue"? When I take
pivotfield "Percent Overdue" out of the pivottable before
I run the codes, they all work fine. When I specify to
remove another pivotfield with another name, the codes
work fine. I even recorded a macro when I removed
pivotfield "Percent Overdue" and then copied that macro
and put it in a commandbutton. When I ran it, I got the
same error. The last code is the macro code. I get the
error "Run-time error '1004':
Unable to get the PivotFields property of the PivotTable
class"

Now the only difference in this pivotfield "Percent
Overdue" is I created it manually from right clicking on
the Pivot Table and selecting Formulas and then
calculatedField. I also happen to notice that when I right
click on the pivottable and then select wizard and layout
and then double click pivotfield "Percent Overdue" that
all the options in the summarize listbox are greyed out
where I cannot select any of them. On all the other
pivotfields I can change them. But I assume this is
normal because the created calculated field has its own
formula in it.

Please help.

Set pvttable = Worksheets("Reps Current").PivotTables
("PivotTable1")
For Each pvtfield In pvttable.DataFields
pvtfield.Orientation = xlHidden
Next pvtfield

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields.Item("Percent
Overdue").Orientation = xlHidden

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields("Percent Overdue").Orientation
= xlHidden

OR

ActiveSheet.PivotTables("PivotTable1").PivotFields
("Percent Overdue"). _
Orientation = xlHidden

Frank Kabel

Excel Program Glitch?
 
Hi Todd
you seem to posting this question now for the third time :-)
As a regular poster you should no this won't help you!

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
Why will it not let me use any of the below methods to
hide pivotfield "Percent Overdue"? When I take
pivotfield "Percent Overdue" out of the pivottable before
I run the codes, they all work fine. When I specify to
remove another pivotfield with another name, the codes
work fine. I even recorded a macro when I removed
pivotfield "Percent Overdue" and then copied that macro
and put it in a commandbutton. When I ran it, I got the
same error. The last code is the macro code. I get the
error "Run-time error '1004':
Unable to get the PivotFields property of the PivotTable
class"

Now the only difference in this pivotfield "Percent
Overdue" is I created it manually from right clicking on
the Pivot Table and selecting Formulas and then
calculatedField. I also happen to notice that when I right
click on the pivottable and then select wizard and layout
and then double click pivotfield "Percent Overdue" that
all the options in the summarize listbox are greyed out
where I cannot select any of them. On all the other
pivotfields I can change them. But I assume this is
normal because the created calculated field has its own
formula in it.

Please help.

Set pvttable = Worksheets("Reps Current").PivotTables
("PivotTable1")
For Each pvtfield In pvttable.DataFields
pvtfield.Orientation = xlHidden
Next pvtfield

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields.Item("Percent
Overdue").Orientation = xlHidden

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields("Percent Overdue").Orientation
= xlHidden

OR

ActiveSheet.PivotTables("PivotTable1").PivotFields
("Percent Overdue"). _
Orientation = xlHidden


Todd huttenstine

Excel Program Glitch?
 
My intentions are not to post multiple times. As I work
on this I keep noticing more information and problems that
I thought would be important.


-----Original Message-----
Hi Todd
you seem to posting this question now for the third

time :-)
As a regular poster you should no this won't help you!

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
Why will it not let me use any of the below methods to
hide pivotfield "Percent Overdue"? When I take
pivotfield "Percent Overdue" out of the pivottable

before
I run the codes, they all work fine. When I specify to
remove another pivotfield with another name, the codes
work fine. I even recorded a macro when I removed
pivotfield "Percent Overdue" and then copied that macro
and put it in a commandbutton. When I ran it, I got the
same error. The last code is the macro code. I get the
error "Run-time error '1004':
Unable to get the PivotFields property of the PivotTable
class"

Now the only difference in this pivotfield "Percent
Overdue" is I created it manually from right clicking on
the Pivot Table and selecting Formulas and then
calculatedField. I also happen to notice that when I

right
click on the pivottable and then select wizard and

layout
and then double click pivotfield "Percent Overdue" that
all the options in the summarize listbox are greyed out
where I cannot select any of them. On all the other
pivotfields I can change them. But I assume this is
normal because the created calculated field has its own
formula in it.

Please help.

Set pvttable = Worksheets("Reps Current").PivotTables
("PivotTable1")
For Each pvtfield In pvttable.DataFields
pvtfield.Orientation = xlHidden
Next pvtfield

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields.Item("Percent
Overdue").Orientation = xlHidden

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields("Percent

Overdue").Orientation
= xlHidden

OR

ActiveSheet.PivotTables("PivotTable1").PivotFields
("Percent Overdue"). _
Orientation = xlHidden

.


Frank Kabel

Excel Program Glitch?
 
Hi Todd
in this case just add this to your original thread as a follow-up
posting. IMHO otherwise these multiple postings could be a little bit
annoying

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
My intentions are not to post multiple times. As I work
on this I keep noticing more information and problems that
I thought would be important.


-----Original Message-----
Hi Todd
you seem to posting this question now for the third

time :-)
As a regular poster you should no this won't help you!

--
Regards
Frank Kabel
Frankfurt, Germany


Todd Huttenstine wrote:
Why will it not let me use any of the below methods to
hide pivotfield "Percent Overdue"? When I take
pivotfield "Percent Overdue" out of the pivottable before
I run the codes, they all work fine. When I specify to
remove another pivotfield with another name, the codes
work fine. I even recorded a macro when I removed
pivotfield "Percent Overdue" and then copied that macro
and put it in a commandbutton. When I ran it, I got the
same error. The last code is the macro code. I get the
error "Run-time error '1004':
Unable to get the PivotFields property of the PivotTable
class"

Now the only difference in this pivotfield "Percent
Overdue" is I created it manually from right clicking on
the Pivot Table and selecting Formulas and then
calculatedField. I also happen to notice that when I right
click on the pivottable and then select wizard and layout
and then double click pivotfield "Percent Overdue" that
all the options in the summarize listbox are greyed out
where I cannot select any of them. On all the other
pivotfields I can change them. But I assume this is
normal because the created calculated field has its own
formula in it.

Please help.

Set pvttable = Worksheets("Reps Current").PivotTables
("PivotTable1")
For Each pvtfield In pvttable.DataFields
pvtfield.Orientation = xlHidden
Next pvtfield

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields.Item("Percent
Overdue").Orientation = xlHidden

OR

Worksheets("Reps Current").PivotTables
("PivotTable1").PivotFields("Percent Overdue").Orientation
= xlHidden

OR

ActiveSheet.PivotTables("PivotTable1").PivotFields
("Percent Overdue"). _
Orientation = xlHidden

.



david mcritchie

Excel Program Glitch?
 
Hi Frank,
In other word's that's a know know

And Todd certainly already knows about
Hints for New Posters
http://www.cpearson.com/excel/newposte.htm

Misnamed subject, etc. -- don't know about the other
postings, but always best to add more information to the
original thread -- if you think you're going to get an answer.
---
HTH,
David McRitchie, Microsoft MVP - Excel
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm

"Frank Kabel" wrote in message ...
Hi Todd
you seem to posting this question now for the third time :-)
As a regular poster you should no this won't help you!

Todd Huttenstine wrote:
Why will it not let me use any of the below methods to




Todd huttenstine

Excel Program Glitch?
 
lol alright thanks guys. I'm just losing my mind here as
I have been working on this same problem now for 4 hours...


-----Original Message-----
Hi Frank,
In other word's that's a know know

And Todd certainly already knows about
Hints for New Posters
http://www.cpearson.com/excel/newposte.htm

Misnamed subject, etc. -- don't know about the other
postings, but always best to add more information to the
original thread -- if you think you're going to get an

answer.
---
HTH,
David McRitchie, Microsoft MVP - Excel
My Excel Pages:

http://www.mvps.org/dmcritchie/excel/excel.htm

"Frank Kabel" wrote in

message ...
Hi Todd
you seem to posting this question now for the third

time :-)
As a regular poster you should no this won't help you!

Todd Huttenstine wrote:
Why will it not let me use any of the below methods to



.



All times are GMT +1. The time now is 02:10 PM.

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