-------------------------------------------- On Tue, 2/21/17, libertystringer via MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com> wrote:
Subject: Re: $$Excel-Macros$$ Re: Once IF is met it is not looping To: excel-macros@googlegroups.com Date: Tuesday, February 21, 2017, 4:01 PM -------------------------------------------- On Tue, 2/21/17, Emamuddin Shah <emt...@gmail.com> wrote: Subject: Re: $$Excel-Macros$$ Re: Once IF is met it is not looping To: "MS EXCEL AND VBA MACROS" <excel-macros@googlegroups.com> Cc: schreiner_p...@att.net Date: Tuesday, February 21, 2017, 3:11 PM Dear Paul, hope you have got change to go through the attached files. ---Emam On Monday, February 6, 2017 at 10:01:43 AM UTC+5:30, Emamuddin Shah wrote:Hi Paul, Hope you have received my email. Regards Emam On Wednesday, February 1, 2017 at 12:52:28 PM UTC+5:30, Emamuddin Shah wrote:Dear Paul, i will share my both excel sheets, so that you can check where iam wrong and correct it, since the document is confidential i cant share here, plz provide your email id. regards Emam On Thursday, October 20, 2016 at 7:04:17 PM UTC+5:30, Paul Schreiner wrote:Mr. Emamuddin, I'm looking through your code and have encountered some issues. First, your sample file is only one sheet,with a Header in row 1 and 2 rows of data in 24 columns (A:X) In your code, you use: sc = Sheets.CountWhich, of course sets the variable "sc" equal to the total number of sheets. but, when you use: For c = 1 To 27 cold(c) = Sheets(sc).Cells(c, 3).Value Next c You're loading data from the LAST sheet of the workbook.Using your sample file, having only 1 sheet, this will use this sheet.However, your variables "c" and "cold" IMPLY "column" and "Column-Old" but your in your loop: the Cells() function syntax is "Cells(row,column)which means that your loop is loading ROWS 1 to 27, column 3 (C) into the cold() array. Your next loop:For b = lr - (size - 1) To lr will fail with your sample file, since:lr = 4size = 100 so your loop is:For b = -95 to 4 In the first iteration, it will fail for row -95 of the cells() function. Of course, I cannot test the code: Workbooks.Open Filename:=Sheets(sc).Cells(1, 8), Password:=Sheets(sc).Cells(10, 8).Value because the sample file does not have a filename in row 1, column "H" I suggest you utilize the "breakpoint" functionality of the VBEditor and step through your program one line at a time and monitor the variables. also, to help you with reading the code, try using the column LETTER in the cells() function when you can. That is: Cells(1,"C") for row 1, column C instead of cells(1,3)You're less likely to confuse the row/column. Of course, this doesn't apply when you're referring to the array index. 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 ------------------------------ ----------- On Wednesday, October 19, 2016 7:39 AM, Emamuddin Shah <emt...@gmail.com> wrote: there are x rows more than 100 in that i want to update 50 rows or 20 rows whatever. iam able to get row details in array, but those details are not getting updated on next workbook i have attached exscel sheet format which iam using, there is 1 more similar file with coloumns shuffeled please find attached On Tuesday, October 18, 2016 at 7:11:00 PM UTC+5:30, Paul Schreiner wrote:I'm trying to follow.There are easier ways to load the array from the cell values, but I'll get to that later. But:You said that you have 50 rows. that means that with:lr = Activecell.Cells(.Rows.count, "A").End(xlUp).Row + 1 lr (last row) = 51you set:size = 100So, for your loop:For b = lr - (size - 1) To lr b = 51 -(100-1) to 51orb = -48 to 51 so this should produce an error when you execute: cmail(ab) = Cells(b, cold(7)).Value What are the values in column "C" rows 1-27?from your use of cold(), they must be integers. Can you send me a sample file?we can step through it and figure out what happens in the second iteration. 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 ------------------------------ ----------- On Tuesday, October 18, 2016 8:49 AM, Emamuddin Shah <emt...@gmail.com> wrote: ITS NOT UPDATED ALL 50 STRINGS ROW DETAILS. IT IS UPDATING ONLY FIRST MATCHED STRING ROW. On Tuesday, October 18, 2016 at 6:13:56 PM UTC+5:30, Emamuddin Shah wrote:Hello Iam trying to Loop so that it matched a string and then fills cells in that row. say i have 50 strings to be matched and then update date on that row, data i have stored in ARRAY here is my part of code where I am struck ++++++++++++++++++= cm = 1 For i = 2 To lri If Cells(i, 7) = cmail(cm) Then Cells(i, 15).Value = stat1(cm) Cells(i, 16).Value = stat2(cm) Cells(i, 17).Value = ccdate(cm) Cells(i, 18).Value = ctime(cm) cm = cm + 1 End If Next ++++++++++++++++++++++++++++++ + -- 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 https://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. To post to this group, send email to excel-...@googlegroups.com. Visit this group at https://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 https://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/d/optout. ** Institutii feudale din tarile Romane. Dictionar coordonator Ovid Sachelarie si Nicolae -- 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 https://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/d/optout.egina Mariaacela care se pronunta pentru intrarea in lupta alaturi de Antanta ce promisese intregul sprijin pentru unirea teritoriilor locuite de romanii din Imperiul Austro-Un-gar cu Romania. Actionau de pe aceste pozitii pe diferite cai - demonstratii articole de presa conferinte interventii diplomatice - printre altele Liga pentru unitatea culturala a tuturor romanilor in conducerea careia se aflau Vasile Lucaciu Nicolae orga Barbu stefanescu-Delavrancea Octavian Goga Actiunea Nationala organizatie condusa de Nicolae Filipescu si care cuprindea pe conservatorii antantofili. Pe linia sustinerii intereselor Puterilor Centrale s-au plasat pornind de la propriile convingeri politice Constantin Stere Petre P. Carp Lupu Costake V. Arion Alexandru Marghiloman dar aceasta nu a semnificat insa ca acesti oameni politici nu sustineau si idealul unitatii nationale. Miscarea socialista din Romania s-a opus insa participarii la razboi pe care in conformitate cu aprecierile Internationalei a ll-a il considerau imperialist . Congresul extraordinar din 1914 al Partidului Social-Democrat a cerut adoptarea unei politici de neutralitate. Se aprecia ca desavarsirea unitatii statale a Romaniei se putea desfasura doar prin socialism si revolutie . Prin numeroase intruniri mitinguri si demonstratii precum si pe plan international socialistii romani au sustinut aceleasi idei. -- 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 https://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/d/optout.
