$$Excel-Macros$$ Re: automate copy paste
Sub T() For Each sht In ActiveWorkbook.Sheets sht.UsedRange.Value = sht.UsedRange.Value Next End Sub Try this Mandeep baluja On Wednesday, 29 March 2017 12:54:31 UTC+5:30, Sundarvelan wrote: > > Dear Friends, > > I have excel book with 70 to 90 sheets, each sheet has formulas. > > For consolidation purpose i need to copy paste each sheet as values. > > Is there any way to automate this copy paste. > > Thanks > N.Sundarvelan > 9600160150 > -- 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.
$$Excel-Macros$$ Re: If 2 conditions matches then give alert -- already exit
Apply data validation in D4:D100 with Custom formula =COUNTIFS($D$4:$D$30,D9,$A$4:$A$30,A9)=1 Regards Mandeep baluja On Monday, 17 April 2017 09:46:30 UTC+5:30, big smile wrote: > > > Hello Friends > > I want that Column A & Column D this both contains if matches > With the same entry again then it should show me the error > That It is already exit in the Raw _ which matches the same > > Ex > If I have already had one entry in Raw 6 – Where written RAVI + Shop > I am doing one entry again in Raw 8 > Like this --- Ravi -- Borivlai – Direct – Shop- 50 > Then -- Ravi + Shop both alreay have in the raw 6 . > So while doing new entry in raw 8 – it should show me that it is there in > Raw 6 . > > -- 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.
Re: $$Excel-Macros$$ Re: vba recorded macro not working
Show me the new output for the new format. Regards Mandeep baluja On Tuesday, 26 July 2016 02:22:13 UTC+5:30, Mike B wrote: > > Hi All, > > Please find an updated workbook with three worksheets which show the "New > Format" of data the "Old Format" of data and what the "Data Should Look > Like". What has change are two things; there used to be "Establishment: " > before the company name it has now been removed; the second thing that has > changed is "Accounting Period Start Date : " used to be in front of the > date, it now has been removed. I have attached the existing module in my > macro that performed the correct formatting when the above two text strings > were used, now that they have been removed I am struggling how to do what > the macro used to do absent the "Establishment: " and "Accounting Period > Start Date : ". > > Any help would be greatly appreciated by anyone that is available to help, > I am really stuck! > > Hi Mandeep, > > You helped me over a year ago with this macro; however they changed the > formatting of the data and now are not using the word “Establishment” > before the company name and are also not using the word “Accounting Period > Start Date :” before the actual date and time; can you help to remove > these from my macro but still capture the company name and also the date? > > Thank you very much, > > Mike > > > > > On Mar 12, 2015, at 7:49 PM, Mike B > > wrote: > > Hi Mandeep, > I would appreciate you looking at the attached worksheet, I have written > and explanation in a comment on the worksheet explaining the issues I am > experiencing, I thought it would be easier for you to understand. > > On Sunday, March 8, 2015 at 12:08:13 PM UTC-5, Mike B wrote: > >> Thank you, thank you so much for all your help and quick response!! I am >> going to have to study my books to understand your code fully, it is so >> precise and quick. Thank you again, Mandeep! >> >> On Thursday, March 5, 2015 at 10:16:12 AM UTC-6, Mike B wrote: >>> >>> >>> >>> I try it works but goes back to what I just did even though I moved my >>> cursor down 11 rows. I would appreciate any help how to get it to advance >>> to the next block that I am trying to copy and paste. I have about 7,000 >>> rows of data to do. >>> Thank you >>> Mike B >>> >>> >>> Sub just_dates2() >>> ' >>> ' just_dates2 Macro >>> ' >>> >>> ' >>> Range("C1166:Y1166").Select >>> Application.CutCopyMode = False >>> ActiveCell.FormulaR1C1 = "Accounting Period Start Date : 12/29/2014 >>> 5:15:09 AM" >>> Range("B1167").Select >>> ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, _ >>> DisplayAsIcon:=False, NoHTMLFormatting:=True >>> >>> >>> End Sub >>> >> > -- > 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 a topic in the > Google Groups "MS EXCEL AND VBA MACROS" group. > To unsubscribe from this topic, visit > https://groups.google.com/d/topic/excel-macros/BxB4QfFrdl4/unsubscribe. > To unsubscribe from this group and all its topics, 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/discus
$$Excel-Macros$$ Re: Count a particular alphabet in a string
Try this formula and drag it down. =LEN(F5)-LEN(SUBSTITUTE(F5,"o","")) ' Regards :- Mandeep baluja 'https://www.facebook.com/groups/825221420889809/ 'https://www.linkedin.com/in/mandeep-baluja-b777bb88 Add a share if it helps :) -- 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.
$$Excel-Macros$$ Re: Macro auto fill is not working
please share your sheet without password after pasting this code so that i can check. On Monday, May 16, 2016 at 12:45:30 PM UTC+5:30, Ashkan Razania wrote: > > It didn't work. same problem > > On Monday, May 16, 2016 at 1:17:15 AM UTC-5, Mandeep Baluja wrote: >> >> Autofill works in scenario if data you want to paste it down similarly. >> What you're doing is selecting two columns and pasting it more than 2 >> columns that's not possible bro.If you wish to paste your data >> automatically you can do this by selecting the appropriate no of columns. >> >> Private Sub Worksheet_Change(ByVal Target As Range) >> Application.EnableEvents = False >> Worksheets("2").Range("C26:ZZ27").Select >> Selection.AutoFill Destination:=Worksheets("2").Range("C26:Zz52") >> Application.EnableEvents = True >> >> End Sub >> >> -- 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.
$$Excel-Macros$$ Re: need help with Evaluate function
Share your sheet otherwise its not possible what the other variables holds Position ?? Player ?? Regards :- Mandeep baluja 'https://www.facebook.com/groups/825221420889809/ 'https://www.linkedin.com/in/mandeep-baluja-b777bb88 On Friday, May 13, 2016 at 7:28:01 AM UTC+5:30, Jaime Richmond wrote: > > I am looping thru and getting a count of values in an array for a specific > user in a single row range. I switch to another range and add in the value > fro that rnage > > Here is the code: > If Evaluate("ISREF('" & "Game" & i & "'!A1)") Then > Set ws = ThisWorkbook.Sheets("Game" & i) > Else > Set ws = ThisWorkbook.Sheets("Games") > End If > > With ws > 'for each game get the range for the names > 'Provide the correct range for the specific Game > Set Rng = .Range("Game" & i) > r = Rng.Row > C = Rng.Column > iRows = Rng.Rows.Count > iCols = Rng.Columns.Count > > 'need to lop thru each player in the grid, get values if match > For p = 1 To iRows > 'get value if name matches > sName = .Cells(r + p - 1, C) > If sName = Player Then > 'add up > sPos = "=" & Position > Set RngPlayerGame = .Range(.Cells(r + p - 1, C), > .Cells(r + p - 1, C + iCols)) > iCount = iCount + ws.Evaluate("COUNTIF(RngPlayerGame," > & Chr(34) & "=B" & Chr(34) & ")")'.Evaluate("=COUNTIF(.Cells(r + p - 1, > C), .Cells(r + p - 1, C + iCols) ,Chr(34) & ='& Position)") > End If > Next > > It does run, no errors, but returns a value of 0 which is incorrect. > Answer is 1, then 2, then 1,1,2,1 for the first player. > > But if I use : >'=COUNTIF(B3:G3,"=B") > > I get the correct value. CLearly I need to use parameters and fnot hard > code. > > In advance - THANK YOU so much. This one has me by the short hairs! > > jaime > -- 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.
$$Excel-Macros$$ Re: value(more than 0) entered in cell should show today's date in another cell
In b1 put this formula =IF(A1>0,TODAY(),"") On Sunday, May 15, 2016 at 4:54:53 PM UTC+5:30, NIJ wrote: > > is there any function in excel (2003) for > > > > if value more than 0 entered in cell say A1 should show today's date > in cell B1 > -- 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.
$$Excel-Macros$$ Re: Macro auto fill is not working
Autofill works in scenario if data you want to paste it down similarly. What you're doing is selecting two columns and pasting it more than 2 columns that's not possible bro.If you wish to paste your data automatically you can do this by selecting the appropriate no of columns. Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False Worksheets("2").Range("C26:ZZ27").Select Selection.AutoFill Destination:=Worksheets("2").Range("C26:Zz52") Application.EnableEvents = True End Sub -- 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.
Re: $$Excel-Macros$$ Error in Excel-VB macro
Great Paul On Tuesday, May 10, 2016 at 4:53:10 PM UTC+5:30, Paul Schreiner wrote: > > What I mean is: > > Protection can be at either the Workbook level, WorkSHEET level, or both. > Some of the worksheets are protected. > It LOOKS like the workbook protection flag is set, but the workbook isn't > really protected. > Otherwise, I couldn't protect the workbook without first knowing the > password to UNprotect it. > > I experienced the same issue you did with regard to opening the file. > I protected the WORKBOOK (with password), then unprotected it (with > password) > and the problem went away. > > *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, May 10, 2016 7:10 AM, ITP Abdulgani Shaikh < > itpabd...@gmail.com > wrote: > > > > But, yes workbook is password protected, but earlier it doesn't gives > error, but now when I am opening workbook it gives error for debug. > > On Mon, May 9, 2016 at 7:31 PM, Paul Schreiner > wrote: > > The problem seems to be that some protection flag for the workbook is set. > I'm using Excel 2010, and for some reason, on the Review tab, the Protect > Workbook icon doesn't SHOW that it is protected. > But I protected the workbook (with password) and then unprotected it. > > After that, the macros work correctly. > > *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 Monday, May 9, 2016 9:09 AM, ITP Abdulgani Shaikh > wrote: > > > > I want to make sure that macro is enable in excel sheet, but it gives > error. > > Please guide. > > > > -- > Shaikh AbdulGani A R > ITP, STP, TRP, STRP > -- > 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. > > > > > -- > Shaikh AbdulGani A R > ITP, STP, TRP, STRP > -- > 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 ti
$$Excel-Macros$$ Re: Suimifs vba code processitng too slow
Try this code Sub Macro8() Sheets("Pivot 101 value (NA)").Range("R7").FormulaR1C1 = "=SUMIFS('PrevNON NA'!C[-1],'PrevNON NA'!C[-13],[@[Po Number]],'PrevNON NA'!C[-12],[@[Po Line]])" lr = Sheets("Pivot 101 value (NON NA)").Cells(Rows.Count, 18).End(xlUp).Row Range("R7:R" & lr).FillDown Sheets("Pivot 101 value (NA)").Select Range("R7").Select ActiveCell.FormulaR1C1 = "=SUMIFS('PrevNA'!C[-1],'PrevNA'!C[-13],[@[Po Number]],'PrevNA'!C[-12],[@[Po Line]])" lr = Sheets("Pivot 101 value (NA)").Cells(Rows.Count, 18).End(xlUp).Row Range("R7:R" & lr).FillDown End Sub ' Regards :- Mandeep baluja 'https://www.facebook.com/groups/825221420889809/ 'https://www.linkedin.com/in/mandeep-baluja-b777bb88 Add a share if it helps :) '** On Wednesday, May 11, 2016 at 11:28:19 AM UTC+5:30, raj.he...@gmail.com wrote: > > Hello Everyone, > > Just to give quick introduction, Myself Raj I am financial Analyst into > reporting domain but I try experimenting few codes in excel vba, I have > come across this group and found to be really helpful. > > Thanks to Ayush and also one and all,for initiating such helpful platform > to each one of us which provides opportunity to learn and can enhance > potentials. > > I have tried bit coding part I was successful in running but it seems that > sumifs formula is taking long time to populate the results . > > Sheets("Pivot 101 value (NON NA)").Select >Range("R7").Select > ActiveCell.FormulaR1C1 = _ > "=SUMIFS('PrevNON NA'!C[-1],'PrevNON NA'!C[-13],[@[Po > Number]],'PrevNON NA'!C[-12],[@[Po Line]])" > Selection.AutoFill Destination:=Range("r7:r" & > ActiveSheet.UsedRange.Rows.Count) > > > can some one please help me to fix the slow lag issue > > in sheets Pivot 101 value (NA) & Pivot 101 value (NON NA) > > I am trying to populate R column using sumifs formula the steps which I > followed to get this result is > > 1) In sheet "Pivot 101 value (NON NA)") column r com I am trying to pull > values from sheet PrevNON NA from Column Q using PO number and PO line > items combinations in sumifs > 2) similarly In Sheet Pivot 101 value (NON NA) column r com I am trying to > pull values from sheet PrevNA from Column Q using PO number and PO line > items combinations in sumifs > > > Rest of the macro is executing well but only this sumifs is causing 10-20 > min time to populate this. > > please find the attached macro sheet and kindly help me in fixing this. > > Thanks one and all have a great day. > > > > > > Tha > Raj > > > -- 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.
$$Excel-Macros$$ Re: overflow error issue
> > Will you please let me know why you're not using a simple vlookup >> function,index match for the same it would be more faster than this to >> search using find method one by one, while defining the value to integer it >> doesn't matter how many rows of data you have 1 to 5 lac it will work for >> -32,768 >> through 32,767 (signed) That's i used long to run the macro for all rows. >> Another thing you can use a dictionary object or use array to intesify the >> speed of macro. Don't miss Application.screenupdating = false in every code >> to avoid flickering. >> > Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: overflow error issue
> > Define your variable as long !! > Sub dnew() Dim i As long Dim lrow As long lrow = Sheets("to").Range("C" & Rows.Count).End(xlUp).Row For i = 2 To lrow If Sheets("to").Cells(i, 2).Value = "up" Then Sheets("to").Cells(i, 2).Value = "" Sheets("to").Cells(i, 1).Value = "" End If Next i End Sub Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 -- 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.
$$Excel-Macros$$ Re: matching and copying data from row excel worksheet to another
> > Ya I did this for consecutive sequence of 19,23,28 ,Please find the > attached formula in the file with helper. > Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 https://www.linkedin.com/in/mandeep-baluja-b777bb88?trk=hp-identity-name -- 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. Trick_To_Get.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: SUMMERY OF PIVOT TABLE
Send me the sheet !!! > > -- 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.
$$Excel-Macros$$ Re: SUMMERY OF PIVOT TABLE
PFA and let me know !! Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 https://www.linkedin.com/in/mandeep-baluja-b777bb88?trk=hp-identity-name -- 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. SAMPLE (3).xls Description: MS-Excel spreadsheet
$$Excel-Macros$$ Re: Copy data from different sheets to 1 summary sheet (single excel file)
> > Haha !! Glad to Help Bro :P,Thanks for providing the references otherwise >> it will be cumbersome to look values !! >> > Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 https://www.linkedin.com/in/mandeep-baluja-b777bb88?trk=hp-identity-name -- 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.
$$Excel-Macros$$ Re: Copy data from different sheets to 1 summary sheet (single excel file)
Simple use this formula after pressing the button, Without any hassle ,Clear sheet after doing work. > > Regards, Mandeep baluja -- 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. Excel_Macro_Grp.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Copy data from different sheets to 1 summary sheet (single excel file)
Where are sample files ?? :( > > -- 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.
$$Excel-Macros$$ Re: Copy data from different sheets to 1 summary sheet (single excel file)
zaks Every thing is possible Except my increment :P !! Elaborate what you wish to combine from Every sheet. @ Devendra :Same process, but for workbooks you need to loop files in folder one by one and Consolidate it !! *Regards, * *Mandeep baluja * *https://www.linkedin.com/messaging/thread/6086488646137958400 * *https://www.linkedin.com/in/mandeep-baluja-b777bb88?trk=hp-identity-name* -- 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.
$$Excel-Macros$$ Re: Copy data from different sheets to 1 summary sheet (single excel file)
> > Worksheets Combine !! Run this macro Hope you're aware about how to run a > macro !! if not try this > > https://support.office.com/en-us/article/Run-a-macro-5e855fd2-02d1-45f5-90a3-50e645fe3155 Sub Simple_Combine() Application.ScreenUpdating = False Application.DisplayAlerts = False On Error Resume Next For Each sht In ActiveWorkbook.Sheets If sht.Name = "Collated" Then sht.Delete Next Dim i As Long Sheets.Add.Name = "Collated" Set ws = Sheets("Collated") For Each sht In ActiveWorkbook.Sheets If sht.Name <> "Collated" Then sht.UsedRange.Copy ws.Range("A" & Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row) End If Next Application.ScreenUpdating = True Application.DisplayAlerts = True End Sub Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Multiple Mail merge same page
> > Use a mail merge option in word You can refer to google to see step by > step process,In my early phase I tried this for more than 2000 > customers,Create an excel sheet set the tags in Word mail merge it will > create that for you. Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Day, Date, Months
We can't entertain manual changes request, As your data is not correct Lots of typo errors in this Ex: "Wednesdsy",Extra Spaces in no particular trend Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: How to get Account Information of Excel using VBA Hi All,
Check this out !! Sub getproperties() On Error Resume Next rw = 1 Worksheets(2).Activate For Each p In ActiveWorkbook.BuiltinDocumentProperties Cells(rw, 1).Value = p.Name Cells(rw, 2).Value = p.Value rw = rw + 1 Next End Sub Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Run code when new cells are added (and only on newly added cells)
Hey Vicky, I didn't understand what exactly you're looking for , But provided you a solution. check the attachment Public lr As Long Private Sub Worksheet_Activate() lr = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row End Sub Private Sub Worksheet_Change(ByVal Target As Range) 'MsgBox lr If Target.Count > 1 Then Exit Sub If Target.Value <> "" Then If Not Intersect(Target, Range(Cells(lr, "A"), Cells(1048576, "A"))) Is Nothing Then Cells(Target.Row, 2).Value = "Entry done at: " & Now() End If End If End Sub Regards, Mandeep baluja -- 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. d.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Date formula for Age Calculation
> > Hey Amar, > While doing manipulations with date you must ensure the Format of System date format.Some people use mm/dd/ and others use dd/mm/ so if someone has provide you the data in his format and you'r date format is different from that it will shows you the error. Note one thing First date in Excel is 01-01-1900 means year 1900, Any date beyond this date will not be accepted in any computer format you're using therefore 30/12/1889 will show you error I changed your formula to make it a date which follows the date format rules. Means Month should not be greater than 12,dates should not exceeds 31. Please find the attached Data Regards, Mandeep Baluja -- 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. Date formula.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: Workbook_BeforClose Event working as expected only 1st time NOT the 2nd time
Tried 15 times every time it works perfectly !! -- 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.
Re: $$Excel-Macros$$ Comment macro code with macros (not manually)
> > Do you have more than 1 macro ? Why don't you paste the code in notepad > and simply replace Msgbox with 'Msgbox and paste it in vba module. > Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Get files in a New folder with help of Macro
Resolution Try this Regards, Try to change the directory path and run the macro where you have access. Mandeep baluja Examine the path of the WebDir and DBDir folders. To do this, log into Forecaster by using the SYS user and then clicking the company link. Both the WebDir and the DBDir folders should be on the IIS Server. The WebDir folder should have the following path: \\MACHINENAME\WEBDIR\ The DbDir folder should have the following path: \\MACHINENAME\DBDIR\ If there are multiple companies, set up separate WebDir and DBDir folders for each company. Companies should not share these folders. You should also enable Web sharing for the WebDir folder, and set the read and write permissions for the folder. To do this, follow these steps: 1. In Windows Explorer, right-click the WebDir folder, and then click Sharing and Security. The Properties dialog box opens. 2. Click the Sharing tab. 3. Click to select the Share this Folder option, and then click Permissions. 4. In the Group or user names box, click the target user group. 5. In the Permissions box, click the appropriate check box to enable or to deny each permission. Then click OK. 6. Click the Web Sharing tab. 7. Click to select theShare this Folder option. 8. Repeat steps 4 and 5 on this tab. Note The DBDir folder should be shared with full control permissions enabled for the frxforecaster user. This article was TechKnowledge Document ID: 27775 -- 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.
$$Excel-Macros$$ Re: VBA access to sheets on Google Drive
Hey paul, I tried the same what I attempted before sometime is trying to open the google sheet through internet explorer with vba code and send the keystrokes to download the file option, but I was unsuccessful because Internet explorer is not correct browser same keystrokes works in googlechrome but not in internet explorer you will see when you do. And then lookup for last file downloaded in download folder and copy paste the data. Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Defining Name Ranges in Excel for different selection region using VBA/Macro
> > check my code > https://groups.google.com/forum/?hl=en%3Fhl%3Den#!searchin/excel-macros/mandeep%7Csort:date/excel-macros/x6VYCJQs1lg/7lMf8CAuDgAJ Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 -- 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.
$$Excel-Macros$$ Re: Defining Name Ranges in Excel for different selection region using VBA/Macro
> > check my code > https://groups.google.com/forum/?hl=en%3Fhl%3Den#!searchin/excel-macros/mandeep%7Csort:date/excel-macros/x6VYCJQs1lg/7lMf8CAuDgAJ Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 -- 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.
$$Excel-Macros$$ Re: Comment macro code with macros (not manually)
> > Haha :P Can you please let us know what will be the use of this ? Okay > check this out !!! Enable the trust center to programatically access vba > modules Sub AddProcedureToModule() Dim VBProj As VBIDE.VBProject Dim VBComp As VBIDE.VBComponent Dim CodeMod As VBIDE.CodeModule Dim LineNum As Long Const DQUOTE = """" ' one " character Set VBProj = ActiveWorkbook.VBProject Set VBComp = VBProj.VBComponents("Module1") Set CodeMod = VBComp.CodeModule With CodeMod LineNum = .CountOfLines + 1 .InsertLines LineNum, "Public Sub SayHello()" LineNum = LineNum + 1 .InsertLines LineNum, " For Each shp In ActiveSheet.Shapes " LineNum = LineNum + 1 .InsertLines LineNum, " ActiveSheet.Shapes(shp.Name).Select " LineNum = LineNum + 1 .InsertLines LineNum, " Selection.Delete" LineNum = LineNum + 1 .InsertLines LineNum, " next" LineNum = LineNum + 1 .InsertLines LineNum, " ' MsgBox " & DQUOTE & "All objectes deleted successfully" & DQUOTE LineNum = LineNum + 1 .InsertLines LineNum, "End Sub" End With End Sub Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Change in existing macro.
> > Small error in paul code change this line Set fc = fl.Files to Set fc = > fldr.Files > > Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Change in existing macro.
Sub CopyToFold() Dim i As Integer Dim fName As String Dim sourcepath As Object Dim destpath As Object Set sourcepath = Application.FileDialog(msoFileDialogFolderPicker) sourcepath.Show Sourcefld = sourcepath.SelectedItems(1) & "\" ' Debug.Print sourcefld Set destpath = Application.FileDialog(msoFileDialogFolderPicker) destpath.Show destfld = destpath.SelectedItems(1) & "\" ' Debug.Print destfld For i = 1 To Range("A" & Rows.Count).End(xlUp).Row fName = Cells(i, 1) FileCopy Sourcefld & fName, destfld & fName Next End Sub Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Replace formula / or MACRO - From List
> > Check this out !!! > Regards, Mandeep baluja -- 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. TEST001 (2).xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: Modification of macro
> > Check this out !!! Regards, Mandeep baluja > Sub MyFilter() Dim path1 As String Dim lngStart As Long, lngEnd As Long lngStart = Range("f1").Value 'assume this is the start date lngEnd = Range("g1").Value 'assume this is the end date path1 = ThisWorkbook.Path & "\" Debug.Print path1 'assume you have field name / label in D29 Range("a1:a3000").AutoFilter Field:=1, _ Criteria1:=">=" & lngStart, _ Operator:=xlAnd, _ Criteria2:="<=" & lngEnd Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Selection.Copy Set newbook = Workbooks.Add With newbook .Sheets("Sheet1").Select Range("A1").PasteSpecial xlPasteAll Application.DisplayAlerts = False .SaveAs Filename:=path1 & Format(lngStart, "dd/mm/yy") & "-" & Format(lngEnd, "dd/mm/") & ".xlsx" Application.DisplayAlerts = True Sheets("Data").Select Application.CutCopyMode = False Selection.AutoFilter 'Range("F1").Select ActiveWorkbook.Save End With End Sub -- 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.
$$Excel-Macros$$ Re: VBA Code for Create Name Range
> > Check this out !!! Regards, Mandeep baluja > https://www.linkedin.com/messaging/thread/6086488646137958400 https://www.facebook.com/groups/825221420889809/?fref=nf Sub Creatnamedrange() Dim Sdic As Object Dim Nrows As Long Dim workrng As Range Dim col As Long: col = 1 Nrows = Sheets("data").Cells(Rows.Count, 1).End(-4162).Row Set Sdic = CreateObject("Scripting.dictionary") Set workrng = Sheets("Data").Range("A1:B" & Nrows) For nrow = 2 To Nrows If Not Sdic.exists(Cells(nrow, 1).Value) Then Sdic.Add Cells(nrow, 1).Value, CStr(Cells(nrow, 1).Value) End If Next sarray = Sdic.keys For i = LBound(sarray) To UBound(sarray) workrng.AutoFilter field:=1, Criteria1:=sarray(i) workrng.SpecialCells(xlCellTypeVisible).Copy Sheets("output").Cells(1, col).PasteSpecial Paste:=xlPasteValues l = workrng.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count Set Rng = Sheets("output").Cells(2, col).Resize(l - 1, 2) ActiveWorkbook.Names.Add Name:=sarray(i), _ RefersTo:=Rng Sheets("data").AutoFilterMode = False Application.CutCopyMode = False col = col + 3 Set Rng = Nothing Next End Sub -- 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. Createnamed_range_Automatically.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Pivot Sorting
> > PFA !! thread closed !!! Regards, Mandeep baluja https://www.linkedin.com/messaging/thread/6086488646137958400 -- 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. Pivot_Sorting.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: Find and Replace with Bold
> > check Two scenarios given in different sheets and let me know !! >> > Sub MakeBold() Dim nrows As Long: nrows = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row With ActiveSheet For nrow = 2 To nrows Searchstring = .Range("A" & nrow).Value searchchar = .Range("B" & nrow).Value Strtpnt = InStr(1, Searchstring, searchchar, vbTextCompare) endpnt = Len(.Range("B" & nrow)) If Strtpnt <> 0 Then .Range("A" & nrow).Characters(Strtpnt, endpnt).Font.Bold = True End If Next End With End Sub Sub MakeBold2() Dim nrows As Long: nrows = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row Dim cmplr As Long: cmplr = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row cmparr = Range("B2:B" & cmplr) For i = LBound(cmparr, 1) To UBound(cmparr, 1) With ActiveSheet For nrow = 2 To nrows Searchstring = .Range("A" & nrow).Value searchchar = cmparr(i, 1) Strtpnt = InStr(1, Searchstring, searchchar, vbTextCompare) endpnt = Len(cmparr(i, 1)) If Strtpnt <> 0 Then .Range("A" & nrow).Characters(Strtpnt, endpnt).Font.Bold = True End If Next End With Next End Sub Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Find and Replace with Bold
> > *What are the parameters/criteria to do the bold,Give us output format > required and list of words that need to be bold by giving example in Excels > sheet.* > Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: formula for creating numbers
> > hey Man, > Read what i wrote bro on side *Put these values in column F as values you will get the desired result** ,which means Copy cells Q2:Q21 go to cell f2 and do pastespecial paste as values check your results then.* *Regards, * *Mandeep baluja * -- 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.
$$Excel-Macros$$ Re: flaps on a single group
Hey Fabio, Please clear the doubts 3 Tabs means Three worksheets ?? Add means merge ?? Filter the data on what criteria ?? Are you looking to merge files with VBA code automatically ? Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Required Macro
PFA !! Regards, Mandeep baluja -- 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. BasicTxlsm.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Having trouble with INDEX and INDIRECT
> > Hey, > The Error you are getting is just because the defined array is not Correct in INDEX,Let me Explain it to you Why !! Indirect Syntax is =INDEX(Array,Rownum,Column) For example you want to go two rows down and 2 columns wide then formula would be = index(A1:D10,2rows down,3columns to right) Here the value of L9 = 3 which is column which means 3 columns to right*(Which is not defined in Array)* from starting and M9 = 1 Which is the row *Change your array to :- $A$64:$D$501 * *Regards, * *Mandeep baluja * -- 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.
$$Excel-Macros$$ Re: add date instantly when there is update in worksheet
> > Use the worksheet event to trigger, It depends on you where you want to > place date. > Private Sub Worksheet_Change(ByVal Target As Range) 'Application.EnableEvents = False Range("E1").Value = Date 'Application.EnableEvents = True End Sub Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Search specific text or numbers in excel folder
Check this out and let me know !! Regards, Mandeep baluja Sub SearchDir() Dim i As Long: i = 2 'A variable to paste values in main sheet Dim Searchword As Variant 'Search value to be used Dim Wbmain As Workbook 'Main workbook Dim fldAs Object'fso object On Error GoTo Tech: 'On error Go to @mandeep.bal...@snapdeal.com 'Turn off Flickering Application.ScreenUpdating = False: Application.DisplayAlerts = False Set Wbmain = ThisWorkbook Wbmain.Sheets("Sheet2").Cells.ClearContents Wbmain.Sheets("Sheet2").Range("A1:C1") = Array("Filename", "Sheetname", "Cellnumber") Searchword = Wbmain.Sheets("Sheet1").Range("A3") Wbmain.Sheets("Sheet2").AutoFilterMode = False 'Set path of Folder Set fld = Application.FileDialog(msoFileDialogFolderPicker) fld.Show fldpath = fld.SelectedItems(1) & "\" fname = Dir(fldpath) 'Looping of Files Do While fname <> "" Set wbtemp = Workbooks.Open(fldpath & fname) For Each ws In wbtemp.Sheets Wbmain.Sheets("Sheet2").Cells(i, 2).Value = ws.Name Wbmain.Sheets("Sheet2").Cells(i, 1).Value = fname ws.Activate Set f = ws.Cells.Find(what:=Searchword, LookIn:=xlValues, lookat:=xlWhole) If Not f Is Nothing Then k = f.Address Add = f.Address Do Set f = ws.UsedRange.FindNext(f) If f.Address <> k Then Add = Add & "," & f.Address End If Loop While Not f Is Nothing And k <> f.Address Wbmain.Sheets("sheet2").Cells(i, 3).Value = Add End If i = i + 1 Next fname = Dir() wbtemp.Close Loop Wbmain.Sheets("sheet2").Activate lr = Wbmain.Sheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Row Wbmain.Sheets("Sheet2").Range("A1:C" & lr).AutoFilter field:=3, Criteria1:="" Wbmain.Sheets("Sheet2").Range("A2:A" & lr).SpecialCells(xlCellTypeVisible).Select Selection.Rows.Delete Wbmain.Sheets("Sheet2").AutoFilterMode = False Exit Sub Tech: MsgBox "An unexpected error has occured You have done something Wrong Contact mandeep.bal...@snapdeal.com" End Sub -- 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. Question Sheet.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Re: Search specific text or numbers in excel folder
Hey, I understood you're question that's why I replied bro. Okay let me tell you a trick. > Go to that folder open in window explorer on right side you will see the > search option enter the number you're are looking for it will show you > those files which contains the text present anywhere in the report,copy > those files in separate folder simple !! Now main work copy the address bar > like path > C:\Users\Mandeep.baluja\Desktop\Hell paste it in google address bar , it will show open a link with file names copy all text from webpage by ctrl+A put it in excel files ,Now you have the names of file you are interested in !! Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: formula for creating numbers
> > check this formula !! I don't use solver in my work if I can achieve this > with simple formula > Regards, Mandeep baluja -- 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. SOLVER.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: 52 week high & low formula excluding zero
> > This question has gone over my head !!! Need a better explanation for this > !! Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Search specific text or numbers in excel folder
> > This can be achieved easily with the VBA code, Why don't you give it a Try > to loop files reside in folder and open it and checking all sheets one by > one and use find method to search for specific keywords. > Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Need an help on this Macros
> > Check this result of your first query. Second will done after completing > my ofc work :D Not have much time to involve today > Regards, Mandeep baluja -- 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. 2_assignment.xls Description: MS-Excel spreadsheet
$$Excel-Macros$$ Re: formula for creating numbers
PFA !! Regards, Mandeep baluja -- 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. FORMULA%2520FOR%2520NUMBERS.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: Student attendance
Show me the file with absentees not updated so that i can check and rectify it once again. Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: no solution
Please send a personal msg to him !! Thread closed !! -- 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.
$$Excel-Macros$$ Re: Web query to get exam result for all students from university website
Check this thread done by me in which the code is doing is providing input to website and showing the info, In past I had made a Macro which can fetch data from flipkart site their product names and their price value, It seems to me your scenario is as same as I did in past, Things depends on what website you're using and what tags value you wish to achieve. Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Sorting Comma Separated Values in a cell
at:=False Sheets("Sheet3").Columns("C:C").Replace What:="Y", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False '--Sorting column second ActiveWorkbook.Worksheets("Sheet3").sort.SortFields.Clear ActiveWorkbook.Worksheets("Sheet3").sort.SortFields.Add Key:=Sheets("Sheet3").Range("C1"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("Sheet3").sort .SetRange Range("C1:D" & lr) .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With '--- lr = Sheets("Sheet3").Cells(Rows.Count, 6).End(xlUp).Row Sheets("Sheet3").Columns("F:F").Replace What:="-*", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Sheets("Sheet3").Columns("F:F").Replace What:="Years", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False ActiveWorkbook.Worksheets("Sheet3").sort.SortFields.Clear ActiveWorkbook.Worksheets("Sheet3").sort.SortFields.Add Key:=Sheets("Sheet3").Range("f1"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("Sheet3").sort .SetRange Range("f1:g" & lr) .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With 'Dim varout() As Variant counter = 1 l1 = Sheets("Sheet3").Cells(Rows.Count, 1).End(xlUp).Row l2 = Sheets("Sheet3").Cells(Rows.Count, 4).End(xlUp).Row l3 = Sheets("Sheet3").Cells(Rows.Count, 7).End(xlUp).Row l4 = Sheets("Sheet3").Cells(Rows.Count, 11).End(xlUp).Row For i = 1 To l1 ReDim Preserve varout(1 To counter) varout(i) = ws.Cells(i, 1).Value counter = counter + 1 Next ' MsgBox Join(varout, ",") For j = 1 To l2 ReDim Preserve varout(1 To counter + 1) varout(counter) = ws.Cells(j, 4).Value counter = counter + 1 Next 'MsgBox Join(varout, ",") For k = 1 To l3 ReDim Preserve varout(1 To counter + 1) varout(counter) = ws.Cells(k, 7).Value counter = counter + 1 Next For L = 1 To l4 ReDim Preserve varout(1 To counter + 1) varout(counter) = ws.Cells(L, 11).Value counter = counter + 1 Next temp = Join(varout, ",") ws1.Cells(Rownum, "C").Value = temp Next 'ws.Cells.ClearContents End Sub Regards, Mandeep baluja https://www.facebook.com/groups/825221420889809/ -- 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. Sorting.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Student attendance
Check this out I have extended your date to 1 to 15 as instructed Regards, Mandeep baluja Sub Fill_Absents() Dim workrngNE As Range Dim workrngPE As Range Dim workrngSS As Range Dim Datasheet As Worksheet Dim Nrows As Long Application.ScreenUpdating = False Set ws = Sheets("Consolidated attendance") Set workrngNE = Sheets("Consolidated attendance").Range("D6:R75") Set workrngPE = Sheets("Consolidated attendance").Range("s6:AG75") Set workrngSS = Sheets("Consolidated attendance").Range("AH6:AV75") Set Datasheet = Sheets("Data entry") ws.Range("D6:AV75").ClearContents Nrows = Datasheet.Cells(Rows.Count, 1).End(xlUp).Row For nrow = 4 To Nrows Choice = Datasheet.Cells(nrow, "A") Select Case Choice Case Is = "NE" Tempdate = Datasheet.Cells(nrow, "C") Varout = Split(Datasheet.Cells(nrow, "D"), ",") For i = LBound(Varout) To UBound(Varout) Tempid = Varout(i) For Each Cell In workrngNE If CInt(Tempid) = CInt(ws.Cells(Cell.Row, 1).Value) And Tempdate = ws.Cells(4, Cell.Column) Then Cell.Value = "A" End If Next Next Set Tempdate = Nothing Set Tempid = Nothing Set Varout = Nothing Case Is = "PE" Tempdate = Datasheet.Cells(nrow, "C") Varout = Split(Datasheet.Cells(nrow, "D"), ",") For i = LBound(Varout) To UBound(Varout) Tempid = Varout(i) For Each Cell In workrngPE If CInt(Tempid) = CInt(ws.Cells(Cell.Row, 1).Value) And Tempdate = ws.Cells(4, Cell.Column) Then Cell.Value = "A" End If Next Next Set Tempdate = Nothing Set Tempid = Nothing Set Varout = Nothing Case Is = "SS" Tempdate = Datasheet.Cells(nrow, "C") Varout = Split(Datasheet.Cells(nrow, "D"), ",") For i = LBound(Varout) To UBound(Varout) Tempid = Varout(i) For Each Cell In workrngSS If CInt(Tempid) = CInt(ws.Cells(Cell.Row, 1).Value) And Tempdate = ws.Cells(4, Cell.Column) Then Cell.Value = "A" End If Next Next Set Tempdate = Nothing Set Tempid = Nothing Set Varout = Nothing End Select Next 'MsgBox "I Am Done" ws.Activate Range("D6:AV75").SpecialCells(xlCellTypeBlanks).Select Selection.Value = "P" End Sub -- 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. student%2520attendance%2520new.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Re: Help Required
> > Your Date is not date but to convert a date to number you can simply > multiply it with one this scenario works most of the cases but not for all. > For Example your date is in A1 put formula in b1 = A1*1 Regards, Mandeep baluja ticket closed -- 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.
Re: $$Excel-Macros$$ Re: Help Required
Multiply date with 1 On Thursday, January 14, 2016 at 5:54:19 PM UTC+5:30, neeraj chauhan wrote: > > Dear sir, > > > > Thanks sir !! > > Kindly share the formula. > > > > *From:* excel-...@googlegroups.com [mailto: > excel-...@googlegroups.com ] *On Behalf Of *Mandeep Baluja > *Sent:* Thursday, January 14, 2016 4:50 PM > *To:* MS EXCEL AND VBA MACROS > *Subject:* $$Excel-Macros$$ Re: Help Required > > > > PFA !! Ticket closed > > Regards, > > Mandeep baluja > > -- > 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.
Re: $$Excel-Macros$$ Sorting Comma Separated Values in a cell
Hey Devendra, Asked for output format? your query is not understandable. data shuffled all the data ??, Show me the output you require for this data given below :- Col 1Col 2 A10,8year,5 year,15 B15,20year,17 D30,50 year,12 -- 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.
Re: $$Excel-Macros$$ Help Required
> > > multiply it by 1 simply !! Regards,Mandeep -- 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.
$$Excel-Macros$$ Re: Help Required
> > PFA !! Ticket closed > Regards, Mandeep baluja -- 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. Site_PM_Summary_Report_-_OME_140116030839_10046.xlsb Description: application/vnd.ms-excel.sheet.binary.macroenabled.12
$$Excel-Macros$$ Re: combine 2 excel workbook using macros selecting only selected rows
Does output sheet created for each Pref value given below ?? if yes are these sheets created in same workbook with Pref name if not, means you need only one sheet for pref 10001 ? Regards, Mandeep Baluja Pref 1001 1002 1005 1007 1009 1005 25000 151233 -- 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.
Re: $$Excel-Macros$$ Sorting Comma Separated Values in a cell
> > Didn't get what is ref.name ??? Didn't find it anywhere in your data,Will > it be possible if you share the output required format. > Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Required Missing Date
> > Can you please provide the output format you're looking for, This will > help us for better understanding. > Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Higher and Lower value to show in different column
Put this in f8 =MAX($C$8:$C$11) put this in g8 =MIN($C$8:$C$11) Ticket closed - -- 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.
Re: $$Excel-Macros$$ vba code for listing folder name and file name
Hey Kat, I am sorry but i didn't get the logic of this code which is totally different from your above query,Things which i understand its just checking whether file_name following the criteria or not, if 9th letter of the file name is equal to R then do something else show error in all columns. try this : Sub Test() Dim rw As Integer Dim fso As Object Dim oFolder As Object Dim F As Object Dim sf As Object Dim col As Integer Dim i As Integer Dim fil As Object rw = 2 ' first row Set fso = CreateObject("scripting.filesystemobject") Set oFolder = fso.GetFolder("E:\Macros_Collection\") i = 1 Cells(i, 1) = "Master Folder" Cells(i, 2) = "Location" Cells(i, 3) = "File name" Cells(i, 4) = "Revision times" Cells(i, 5) = "Date Modified" Cells(i, 6) = "Revision times" Cells(i, 7) = "Date Modified" Cells(i, 8) = "Revision times" Cells(i, 9) = "Date Modified" For Each F In oFolder.subfolders Cells(rw, 1) = F.Name Cells(rw, 2) = F.Path For Each sf In F.subfolders Cells(rw, 3) = Left(sf.Name, 8) col = 4 For Each fil In sf.Files If fil.Name <> "Thumbs.db" Then If Mid(fil.Name, 9, 1) = "R" Then Cells(rw, col) = Mid(fil.Name, 10, InStrRev(fil.Name, ".") - 10) Else Range(Cells(rw, col), Cells(rw, 9)) = "error" End If End If rw = rw + 1 Next fil Next sf Next F End Sub -- 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.
$$Excel-Macros$$ Re: Combined Output
> > PFA !! Mandeep baluja -- 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. combination (1).xlsx Description: MS-Excel 2007 spreadsheet
Re: $$Excel-Macros$$ vba code for listing folder name and file name
Revision time ?? I have not heard about this while searching it on the internet I found this http://excel.tips.net/T002868_Using_Revision_Tracking.html which track the changes done workbook shared on network. Is revision time being noted anywhere in your workbook your snapshot is not showing what is the revision time you have entered 6,7 etc. This is a bit difficult but not impossible,What i assumed is you each sheet in Excel having the History sheet which tracks the changes with the last line "The history ends with the changes saved on 11-01-2016 at 13:01." after certain interval Confirm this first !! Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: vba code help for the open file location
Check this out !! REgards, Mandeep baluja -- 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. update button code.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Need Help in calculation of score
> > Hey check this out !! >> > Regards, Mandeep baluja -- 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. SG (2).xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: Need Help in calculation of score
Hey SG, It's very difficult to understand your query what you wish or what you want to achieve as may be we both are using different terminology or might be explanation. Sorry to say Hope someone will help you with these given below instructions as I am not able to matchup the aim. You Wrote:- 1) What i need is to calculate the final score in column "I" 2) however, i'm, not able to do distribution of score. "Here the distribution is given in range("K3:P5")" 3) if any of parameter is NA then its score must be distributed in rest of the parameters.(Not to M(Fatal) parameter) 4) Sorry for the confusion. Final score is 100 if all are Yes. 5) I need the formula in Colum "I" for Score.(Distribution of Score in case of "NA" should be calculated here.) 6) The difference in headers are typo errors. 7) d4 & e4 are no..that means their score 30& 10 = 40 gets divided by 4. so the score in k4 is 20,l4=30,m4=0,n4=0,o4 =25 & p4=25,*so that final score in i4 is 100. if any parameter goes "No"*, then its number get deducted from total score. 8) Also, in k11, why the score is 20. It should be 10 only according to the header & same for rest of the cells. Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Create Multiple Excel Files from One file
Glad to help !!! Regards, Mandeep baluja > -- 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.
Re: $$Excel-Macros$$ Download data of a Google sheet in excel sheet with VBA
Hey Devendra, The issues is while using a sendkeys method procedure send the keys one by one not once at that time. Therefore it is opening the compact controls of Google spreadsheet without going into actual control. Looking for the procedure which can process the keycombination at once :(. Once the file is downloaded rest of work is easy Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Create Multiple Excel Files from One file
Let me know !! Sub CreateSheetsDemo() Dim wb As Workbook Dim wbtemp As Workbook Dim Workrng As Range Dim uniquename As Variant Dim Dic As Object Dim lr As Long: lr = Sheets("Order").Cells(Rows.Count, 4).End(xlUp).Row mypath = ThisWorkbook.Path & "\" Application.ScreenUpdating = False Application.DisplayAlerts = False Set wb = ThisWorkbook Set Workrng = wb.Sheets("order").Range("A1:E" & lr) Debug.Print Workrng.Address Set Dic = CreateObject("Scripting.dictionary") Set dic2 = CreateObject("Scripting.dictionary") Set dic3 = CreateObject("Scripting.dictionary") Dic.RemoveAll dic2.RemoveAll dic3.RemoveAll ActiveSheet.AutoFilterMode = False For ROWNUM = 2 To lr If (Not Dic.Exists(Cells(ROWNUM, 4).Value)) Then Debug.Print Cells(ROWNUM, 5) Dic.Add Cells(ROWNUM, 4).Value, Cells(ROWNUM, 5).Value End If Next uniquename = Dic.keys For i = LBound(uniquename) To UBound(uniquename) Workrng.AutoFilter field:=4, Criteria1:=uniquename(i) Set wbtemp = Workbooks.Add Workrng.SpecialCells(xlCellTypeVisible).Copy wbtemp.Sheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteAll wbtemp.Sheets("Sheet1").Name = "Order" 'Calculation work Set ws = wbtemp.Sheets.Add ' ADDED THIS LINE BECAUSE MY EXCEL BOOK DOES NOT CREATES "SHEET2" AUTOMATICALLY ws.Name = "Summary" wbtemp.Sheets("Summary").Range("A1:B1").Merge Debug.Print Dic.Item(uniquename(i)) wbtemp.Sheets("Summary").Range("A1").Value = uniquename(i) & " Employee id :" & Dic.Item(uniquename(i)) lr = wbtemp.Sheets("order").Cells(Rows.Count, 4).End(xlUp).Row '--- For ROWNUM = 2 To lr If (Not dic2.Exists(wbtemp.Sheets("order").Cells(ROWNUM, 2).Value)) Then dic2.Add wbtemp.Sheets("order").Cells(ROWNUM, 2).Value, 1 Else dic2.Item(wbtemp.Sheets("order").Cells(ROWNUM, 2).Value) = dic2.Item(wbtemp.Sheets("order").Cells(ROWNUM, 2).Value) + 1 End If Next varout1 = dic2.keys wbtemp.Sheets("Summary").Range("A3").Resize(UBound(varout1) + 1, 1) = Application.Transpose(varout1) For Each cell In wbtemp.Sheets("Summary").Range("A2:a10") cell.Offset(0, 1) = dic2.Item(cell.Value) Next '--- For ROWNUM = 2 To lr If (Not dic3.Exists(wbtemp.Sheets("order").Cells(ROWNUM, 3).Value)) Then dic3.Add wbtemp.Sheets("order").Cells(ROWNUM, 3).Value, 1 Else dic3.Item(wbtemp.Sheets("order").Cells(ROWNUM, 3).Value) = dic3.Item(wbtemp.Sheets("order").Cells(ROWNUM, 3).Value) + 1 End If Next Varout2 = dic3.keys wbtemp.Sheets("Summary").Range("A10").Resize(UBound(Varout2) + 1, 1) = Application.Transpose(Varout2) For Each cell In wbtemp.Sheets("Summary").Range("A10:a20") cell.Offset(0, 1) = dic3.Item(cell.Value) Next wbtemp.Sheets("Summary").Columns("A:I").AutoFit wbtemp.SaveAs Filename:=mypath & uniquename(i) wbtemp.Close wb.Sheets("order").AutoFilterMode = False 'Dic.RemoveAll dic2.RemoveAll dic3.RemoveAll Next End Sub -- 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.
$$Excel-Macros$$ Re: Need Help in Macro Loop for data dirstribution
> > Check this out,Easily achieved with formula > {=IFERROR(INDEX(Raw!$D$2:$H$85,MATCH('WAVE 1'!$A4&'WAVE 1'!B$2&'WAVE > 1'!$A$2,Raw!$A$2:$A$85&Raw!$B$2:$B$85&Raw!$C$2:$C$85,0),MATCH(B$3,Raw!$D$1:$H$1,0)),0)} > Regards, Mandeep baluja -- 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. Sample Report.xlsx Description: MS-Excel 2007 spreadsheet
Re: $$Excel-Macros$$ Re: Create Multiple Excel Files from One file
> > Try This code !! > Sub CreateSheetsDemo() Dim wb As Workbook Dim wbtemp As Workbook Dim Workrng As Range Dim uniquename As Variant Dim Dic As Object Dim lr As Long: lr = Sheets("Order").Cells(Rows.Count, 4).End(xlUp).Row mypath = ThisWorkbook.Path & "\" Application.ScreenUpdating = False Application.DisplayAlerts = False Set wb = ThisWorkbook Set Workrng = wb.Sheets("order").Range("A1:E" & lr) Debug.Print Workrng.Address Set Dic = CreateObject("Scripting.dictionary") Set dic2 = CreateObject("Scripting.dictionary") Set dic3 = CreateObject("Scripting.dictionary") Dic.RemoveAll dic2.RemoveAll dic3.RemoveAll ActiveSheet.AutoFilterMode = False For rownum = 2 To lr If (Not Dic.Exists(Cells(rownum, 4).Value)) Then Dic.Add Cells(rownum, 4).Value, Cells(rownum, 5).Value End If Next uniquename = Dic.keys For i = LBound(uniquename) To UBound(uniquename) Workrng.AutoFilter field:=4, Criteria1:=uniquename(i) Set wbtemp = Workbooks.Add Workrng.SpecialCells(xlCellTypeVisible).Copy wbtemp.Sheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteAll wbtemp.Sheets("Sheet1").Name = "Order" 'Calculation work Set ws = wbtemp.Sheets.Add ' ADDED THIS LINE BECAUSE MY EXCEL BOOK DOES NOT CREATES "SHEET2" AUTOMATICALLY ws.Name = "Summary" wbtemp.Sheets("Summary").Range("A1:B1").Merge Debug.Print wbtemp.Sheets("Summary").Range("A1").Value = uniquename(i) & " Employee id :" & Dic.Item(uniquename(i)) lr = wbtemp.Sheets("order").Cells(Rows.Count, 4).End(xlUp).Row '--- For rownum = 2 To lr If (Not dic2.Exists(wbtemp.Sheets("order").Cells(rownum, 2).Value)) Then dic2.Add wbtemp.Sheets("order").Cells(rownum, 2).Value, 1 Else dic2.Item(wbtemp.Sheets("order").Cells(rownum, 2).Value) = dic2.Item(wbtemp.Sheets("order").Cells(rownum, 2).Value) + 1 End If Next varout1 = dic2.keys wbtemp.Sheets("Summary").Range("A3").Resize(UBound(varout1) + 1, 1) = Application.Transpose(varout1) For Each cell In wbtemp.Sheets("Summary").Range("A2:a10") cell.Offset(0, 1) = dic2.Item(cell.Value) Next '--- For rownum = 2 To lr If (Not dic3.Exists(wbtemp.Sheets("order").Cells(rownum, 3).Value)) Then dic3.Add wbtemp.Sheets("order").Cells(rownum, 3).Value, 1 Else dic3.Item(wbtemp.Sheets("order").Cells(rownum, 3).Value) = dic3.Item(wbtemp.Sheets("order").Cells(rownum, 3).Value) + 1 End If Next Varout2 = dic3.keys wbtemp.Sheets("Summary").Range("A10").Resize(UBound(Varout2) + 1, 1) = Application.Transpose(Varout2) For Each cell In wbtemp.Sheets("Summary").Range("A10:a20") cell.Offset(0, 1) = dic3.Item(cell.Value) Next wbtemp.Sheets("Summary").Columns("A:I").AutoFit wbtemp.SaveAs Filename:=mypath & uniquename(i) wbtemp.Close wb.Sheets("order").AutoFilterMode = False Dic.RemoveAll dic2.RemoveAll dic3.RemoveAll Next End Sub -- 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.
$$Excel-Macros$$ Re: Create Multiple Excel Files from One file
Did you run the code in input file ? Have you tried debugging of code step by step ? Why paste:=xlpasteall is deleted ? I have not received this error while running this code something u are doing wrong unintentionally. Regards, Mandeep -- 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.
$$Excel-Macros$$ Re: Create Multiple Excel Files from One file
Check this out !! and let me know Sub CreateSheetsDemo() Dim wb As Workbook Dim wbtemp As Workbook Dim Workrng As Range Dim uniquename As Variant Dim Dic As Object Dim lr As Long: lr = Sheets("Order").Cells(Rows.Count, 4).End(xlUp).Row mypath = ThisWorkbook.Path & "\" Set wb = ThisWorkbook Set Workrng = wb.Sheets("order").Range("A1:E" & lr) Debug.Print Workrng.Address Set Dic = CreateObject("Scripting.dictionary") Set dic2 = CreateObject("Scripting.dictionary") Set dic3 = CreateObject("Scripting.dictionary") For rownum = 2 To lr If (Not Dic.Exists(Cells(rownum, 4).Value)) Then Dic.Add Cells(rownum, 4).Value, Cells(rownum, 5).Value End If Next uniquename = Dic.keys For i = LBound(uniquename) To UBound(uniquename) Workrng.AutoFilter field:=4, Criteria1:=uniquename(i) Set wbtemp = Workbooks.Add Workrng.SpecialCells(xlCellTypeVisible).Copy wbtemp.Sheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteAll wbtemp.Sheets("Sheet1").Name = "Order" 'Calculation work wbtemp.Sheets("Sheet2").Name = "Summary" wbtemp.Sheets("Summary").Range("A1:B1").Merge Debug.Print wbtemp.Sheets("Summary").Range("A1").Value = uniquename(i) & " Employee id :" & Dic.Item(uniquename(i)) lr = wbtemp.Sheets("order").Cells(Rows.Count, 4).End(xlUp).Row '--- For rownum = 2 To lr If (Not dic2.Exists(Cells(rownum, 2).Value)) Then dic2.Add Cells(rownum, 2).Value, 1 Else dic2.Item(Cells(rownum, 2).Value) = dic2.Item(Cells(rownum, 2).Value) + 1 End If Next Varout1 = dic2.keys wbtemp.Sheets("Summary").Range("A3").Resize(UBound(Varout1) + 1, 1) = Application.Transpose(Varout1) For Each cell In wbtemp.Sheets("Summary").Range("A2:a10") cell.Offset(0, 1) = dic2.Item(cell.Value) Next '--- For rownum = 2 To lr If (Not dic3.Exists(Cells(rownum, 3).Value)) Then dic3.Add Cells(rownum, 3).Value, 1 Else dic3.Item(Cells(rownum, 3).Value) = dic3.Item(Cells(rownum, 3).Value) + 1 End If Next Varout2 = dic3.keys wbtemp.Sheets("Summary").Range("A10").Resize(UBound(Varout2) + 1, 1) = Application.Transpose(Varout2) For Each cell In wbtemp.Sheets("Summary").Range("A10:a20") cell.Offset(0, 1) = dic3.Item(cell.Value) Next wbtemp.Sheets("Summary").Columns("A:I").AutoFit wbtemp.SaveAs Filename:=mypath & uniquename(i) wbtemp.Close wb.Sheets("order").AutoFilterMode = False dic2.RemoveAll dic3.RemoveAll Next End Sub -- 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.
$$Excel-Macros$$ Re: Quasi Vlookup
Check this out !!! Regards, Mandeep baluja -- 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. CONTAINER PROJECT - 001.xlsx Description: MS-Excel 2007 spreadsheet
Re: $$Excel-Macros$$ Download data of a Google sheet in excel sheet with VBA
Hey Devendra, Excel has option in Data tab and "From Web" option to import the data from websites,I Tried and found that this Case doesn't work if your sheet contains a lot of data and to fetch it will take a lot of time, Instead of this what i think is to Download the file first and then use vba to check the latest file in your downloads and copy the data into your sheets which will be much faster that fetching from spreadsheet and then discard the temp sheet. Here the problem comes with automation is you have to work with internet explorer to do the same rather than using a GoogleChrome. I thoroughly studied to find the shortcut to download a file with Send keys it should be like sendkeys "%+FD{Enter}",Once the file will get downloaded it is easy to do the rest of work with VBA. Let's see who will implement this successfully. Paul@ can you do one thing to send the keys combination to internet explorer. Sub Fetch_Data_from_Spreadsheet() Dim ie As Object Set ie = CreateObject("InternetExplorer.Application") ie.navigate "https://docs.google.com/spreadsheets/d/1z1W_cnkiMsQjgHmuoolxrXgm9h54NC0CQiHqtb8KNZk/edit?ts=5607ad6d#gid=0"; ie.Visible = True Application.SendKeys "%+FD{Enter}", True End Sub Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Formula
Hi, Kindly elaborate your query !! Regards, Mandeep Baluja -- 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.
$$Excel-Macros$$ Re: data validation upon saving...
Hi Lin, Check the attachment and find the same Scenario as required !! One thing which i didn't understand from where predetermined Total comes.(If I am assuming it correctly You are trying to validate values from two different sheets), Set this scenario in your sheet accordingly. Regards, Mandeep baluja -- 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. Validate.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Enable/Disable text box based on User Login
Check this attachment !! userid for admin is : admin and password is 123 same as for Guest. Regards, Mandeep baluja https://www.facebook.com/groups/825221420889809/ -- 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. Demo_of_userform_with_Limitited_access_to_guest.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: purchase sales in excel
Hi Hemal, You need Sales Qty against a purchase through RG which can easily retrieved in attachment through sumproduct Note: Duplicates values in sales table is summed !! If you want to get all the details from sales table to purchase table,There you need to mention Which row you want to retrieve and on what criteria as you sales table have duplicates. Regards, Mandeep baluja -- 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. price protection 19.11 to 01.12.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: macro for hard copy of formulas
Check this out is this you're looking for !! Regards, Mandeep baluja Sub GetDetails_of_Sheet() Dim ws As Worksheet Dim i As Long: i = 2 On Error Resume Next Application.ScreenUpdating = False Application.DisplayAlerts = False For Each sht In ActiveWorkbook.Sheets If sht.Name = "Info" Then sht.Delete Next Set ws = Sheets.Add ws.Name = "Info" ws.Range("A1:C1") = Array("Cellno", "Formulaused", "Sheetname") For Each sht In ActiveWorkbook.Sheets If sht.Name <> "Info" Then For Each cell In sht.UsedRange.SpecialCells(xlCellTypeFormulas) ws.Range("A" & i) = cell.Address ws.Range("B" & i) = "'" & cell.Formula ws.Range("C" & i) = sht.Name i = i + 1 Next End If Next End Sub -- 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.
Re: $$Excel-Macros$$ plz help
Dear Sudhir/Pankaj, First thing you should not is this showing Error because of regional Setting, because both of you're using different Date format,As I check this file it shows me the same error because My System format is "dd/mm/" While the answer in sheet is in format mm/dd/,Whenever Excel file is opened it wait and show the Screenshot the sheet Where you can't perform any operation, As you enable the warning Excel cells checks the Format which is incorrect for Data, Here the values turned out to be an error. If you wish to see just change your regional setting and date format to mm/dd/ you will get the correct results. Now, As I checked the Question You Can solve it by Simply using Correct formats of Date by changing Dates Format. Note:: Don't forget to remove the Spaces around your Text Thanks, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: Paragraph - Split Up - Excel
Run this code !! Mandeep baluja Sub SplitPara() Dim lr As Long: lr = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row Dim j As Long: j = 0 For Nrow = 2 To lr arr = Split(Trim(Range("A" & Nrow).Value), vbLf) ReDim arr1(LBound(arr) To UBound(arr)) For lb = LBound(arr) To UBound(arr) If arr(lb) <> "" Then arr1(j) = arr(lb) j = j + 1 End If Next ReDim Preserve arr1(0 To j - 1) Range("b" & Nrow).Resize(1, UBound(arr1) + 1).Value = arr1 j = 0 Next End Sub -- 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. SplitParagraphswithArray.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Macro (Excel) Need data via Formula
Hi, Give us a clear explanation to what to achieve by giving some output !! Regards, Mandeep baluja -- 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.
$$Excel-Macros$$ Re: VBA (Excel) Transferring Data to Website
Thanks Bro,I tried my best took some help from my friend lokesh for Datepicker control. By google chrome select the tag element and see the name by right click and go to inspect element and check the name !! You Can't name them but you can assign it to objects and do the manipulation on objects which reflect on page. Regards, Mandeep -- 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.
Re: $$Excel-Macros$$ Macro (Excel) Need data via Formula
Check this out and let me know !!! Two formulas to be used !! Regards, Mandeep baluja -- 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. Demo.xlsx Description: MS-Excel 2007 spreadsheet
Re: $$Excel-Macros$$ Macro (Excel) Need data via Formula
Check this out !!! Regards, Mandeep baluja On Wednesday, December 9, 2015 at 5:22:27 PM UTC+5:30, Sadiq wrote: > > I did not required the count of name . > > I need that names in cells of given count. > > e.g - > > Name- Sadiq > Count 20 > > I need this name in 20 times in "a" cell. > > > On Wed, Dec 9, 2015 at 3:45 PM, Mandeep Baluja > wrote: > >> >> Check this out !! >> Mandeep baluja >> >> >> >> On Wednesday, December 9, 2015 at 3:31:45 PM UTC+5:30, Sadiq wrote: >>> >>> Hello Team , >>> >>> >>> >>> I have a excel sheet where have Team Name in “A” column and in “B” >>> column we have count. I need Team name details in another sheet with count >>> of Team Name via formula. >>> >>> >>> >>> Sheet attached for your easy reference. >>> >>> >>> >>> Rgds, >>> >>> Mohd Sadiq >>> >> -- >> 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. >> > > > > -- > Regards > Mohd Sadiq > contact no:- 9565809193 > E-mail :- mohdsa...@gmail.com > -- 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. Demo.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: VBA (Excel) Transferring Data to Website
Check this updated Attachment !!! Regards, Mandeep baluja https://www.facebook.com/groups/825221420889809/ -- 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. defease with ease.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Macro (Excel) Need data via Formula
Check this out !! Mandeep baluja On Wednesday, December 9, 2015 at 3:31:45 PM UTC+5:30, Sadiq wrote: > > Hello Team , > > > > I have a excel sheet where have Team Name in “A” column and in “B” column > we have count. I need Team name details in another sheet with count of Team > Name via formula. > > > > Sheet attached for your easy reference. > > > > Rgds, > > Mohd Sadiq > -- 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. Demo.xlsx Description: MS-Excel 2007 spreadsheet
$$Excel-Macros$$ Re: VBA (Excel) Transferring Data to Website
Go to tools reference enable microsoft internet controls, microsoft html object librarary. I did the coding to process data from excel to this website but unable to fill the datepicker control working on Jquery to do the same that will soon post the same. Regards, Mandeep baluja -- 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. defease with ease.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: SQL Queriies in Excel sheets
Sorry , I am bit confused are you willing to run a query of SQL from Excel, Thant's needs a connection, Or you're trying to work in Excel as same as you do in SQL by Getting Data as per your requirement from Sheet1 to Output sheet with the help of Macros/VBA Codes. Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Sorting Positive & negative numbers rows
Hi Amar, There are many ways to do it, it depends on you what you're looking for ,This can be achieved with the help of Helper Column, with Filter,advance filter require a range to refer as far as i know, apply this formula in helper column and put this criteria true for positive false for negative =IF(AND(J8:O8>0),"True","False") Regards, Mandeep baluja -- 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.
Re: $$Excel-Macros$$ Re: Sorting Positive & negative numbers rows
> > Find the attachment and let me know !! > Regards, Mandeep baluja -- 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. Sorting Positive & negative numbers rows (1).xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
$$Excel-Macros$$ Re: Sorting Positive & negative numbers rows
> > How to judge the negative trend, I can't see any value which is negative > here, What pattern needs to follow, > continuous positive growth means all arrows should move upwards? Please > put comments on your data for some random entries so that we can understand > your requirement. Regards, Mandeep baluja > -- 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.
$$Excel-Macros$$ Re: Macro copies the Cell BG colours in one worksheet to designated cells in another worksheet
Run this code and let me know Regards, Mandeep baluja Private Sub Worksheet_Change(ByVal Target As Range) Dim Rownum As Long: Dim colnum As Long: Dim Temp As Long: Temp = 4 Dim lastentry As Long With ActiveSheet For colnum = 2 To 6 If colnum = 3 Or colnum = 6 Then lastentry = 10 Else lastentry = 12 End If For Rownum = 2 To lastentry Sheets("Sheet1").Cells(Rownum, colnum).Interior.Color = .Cells(Temp, 18).DisplayFormat.Interior.Color ' Sheets("Sheet1").Cells(Rownum, colnum).Value = .Cells(Temp, 18).Value Temp = Temp + 1 Next Next End With End Sub -- 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.