Dear paul, its so nice.. That changed part working fine ..But am facing error in the below line of the code * With .PivotFields(aryRowFields(i))* Thanks, Lax
On Monday, October 27, 2014 5:45:46 PM UTC+5:30, Paul Schreiner wrote: > There's really nothing I can do to help. > It's not a macro problem, it's a problem in your data files. > > In Customer.xlsm,your Co1 thru Co8 sheets have columns A-O > but in your new workbook, you've dropped the "City" field and the "HS" > field. > > CoL Cust Cust_reval A CUST# CUST# B CUST-NAME CUST-NAME C 12 MOýSALES 12 > MOýSALES D 12 MOýGROSS 12 MOýGROSS E 12 MOýCREDITS 12 MOýCREDITS F 12 > MOýGP % 12 MOýGP % G 12 MOýRET % 12 MOýRET % H SALE-TYPE SALE-TYPE I > ADDRESS ADDRESS J CITY ZIP K ZIP PHONE# L PHONE# SHIP VIA M SHIP VIA > COMPANY N COMPANY O HS > > If you really no longer need these fields, then you'll have to either put > a value in the N and O column heading to get the pivot table to work, or > you'll need to shift your columns in your macro. > > change "P1" and "Q1" to "N1" and "O1" > also probably change > SourceData:=wsScratch.Name & "!R1C1:R" & nextrow - 1 & "C" & 15 + > NUM_SHEETS, > to > SourceData:=wsScratch.Name & "!R1C1:R" & nextrow - 1 & "C" & 13 + > NUM_SHEETS, > > *Paul* > ----------------------------------------- > > > > > > > > *“Do all the good you can,By all the means you can,In all the ways you > can,In all the places you can,At all the times you can,To all the people > you can,As long as ever you can.” - John Wesley* > ----------------------------------------- > > *From:* Laxmanan M <laxfly...@gmail.com <javascript:>> > *To:* excel-...@googlegroups.com <javascript:> > *Cc:* schrein...@att.net <javascript:> > *Sent:* Monday, October 27, 2014 7:26 AM > *Subject:* Re: $$Excel-Macros$$ Issue while using vba for pivot table > data's > > Dear paul, > Thanks for the Intrest to help me..But i have to run the macro > for Customer reval.Xlsm only.Im newbie for vba and am in the learning > phase..please help me to edit the codes whish should work for Customer > reval.Xlsm .Becoz this file is the final file for us now.Please help me on > the same. > > Kind regards, > Lax > > > On Monday, October 27, 2014 4:46:20 PM UTC+5:30, Paul Schreiner wrote: > > The problem seems to be that in your workbook Company_Reval.xlsm, > your consolidated sheet is missing column headings in column N and O > > All columns in your pivot table have to have column headings. > > looking a bit closer, it looks like your new file is missing the City > column > from column J, which then shifted the Zip/phone/shipVia/Company columns. > it's allso missing the "HS" column. > > adding the necessary column headings should fix your problem. > > > *Paul* > ------------------------------ ----------- > > > > > > > > *“Do all the good you can,By all the means you can,In all the ways you > can,In all the places you can,At all the times you can,To all the people > you can,As long as ever you can.” - John > Wesley*------------------------------ > ----------- > > *From:* Laxmanan M <laxfly...@gmail.com> > *To:* excel-...@googlegroups.com > *Sent:* Monday, October 27, 2014 6:49 AM > *Subject:* $$Excel-Macros$$ Issue while using vba for pivot table data's > > Dear Masters, > i have 2 workbooks one is old and another one is new workbook.Ususally we > are doing pivot table to customize the data for consolidation. > But now we have used macro to customize the datas.we have old workbook > which has a macro in that and it was working fine.But now we made some > changes in the new workbook .But when apply the same code we are getting > error > Old workbook Name:customer.Xlsm > New workbook name:customer workbook_reval.Xlsm > I have attached the two workbooks.Now i need to run the macro in new > workbook using same concept of the old workbook code > I'm Pulling my hair out from morning..I dint able to solve the issue. > Kindly help me on the same > Lax > -- > Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s > =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ > https://www.facebook.com/discussexcel > > FORUM RULES > > 1) Use concise, accurate thread titles. Poor thread titles, like Please > Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice > will not get quick attention or may not be answered. > 2) Don't post a question in the thread of another member. > 3) Don't post questions regarding breaking or bypassing any security > measure. > 4) Acknowledge the responses you receive, good or bad. > 5) Jobs posting is not allowed. > 6) Sharing copyrighted material and their links is not allowed. > > NOTE : Don't ever post confidential data in a workbook. Forum owners and > members are not responsible for any loss. > --- > You received this message because you are subscribed to the Google Groups > "MS EXCEL AND VBA MACROS" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to excel-macros...@ googlegroups.com. > To post to this group, send email to excel-...@googlegroups.com. > > Visit this group at http://groups.google.com/group/excel-macros. > For more options, visit https://groups.google.com/d/optout. > > > -- > Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s > =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ > https://www.facebook.com/discussexcel > > FORUM RULES > > 1) Use concise, accurate thread titles. Poor thread titles, like Please > Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice > will not get quick attention or may not be answered. > 2) Don't post a question in the thread of another member. > 3) Don't post questions regarding breaking or bypassing any security > measure. > 4) Acknowledge the responses you receive, good or bad. > 5) Jobs posting is not allowed. > 6) Sharing copyrighted material and their links is not allowed. > > NOTE : Don't ever post confidential data in a workbook. Forum owners and > members are not responsible for any loss. > --- > You received this message because you are subscribed to the Google Groups > "MS EXCEL AND VBA MACROS" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to excel-macros...@googlegroups.com <javascript:>. > To post to this group, send email to excel-...@googlegroups.com > <javascript:>. > Visit this group at http://groups.google.com/group/excel-macros. > For more options, visit https://groups.google.com/d/optout. > > > -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Jobs posting is not allowed. 6) Sharing copyrighted material and their links is not allowed. NOTE : Don't ever post confidential data in a workbook. Forum owners and members are not responsible for any loss. --- You received this message because you are subscribed to the Google Groups "MS EXCEL AND VBA MACROS" group. To unsubscribe from this group and stop receiving emails from it, send an email to excel-macros+unsubscr...@googlegroups.com. To post to this group, send email to excel-macros@googlegroups.com. Visit this group at http://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/d/optout.
