Re: $$Excel-Macros$$ Abridged summary of excel-macros@googlegroups.com - 8 updates in 5 topics
e: > > Subject: Re: $$Excel-Macros$$ Need Help: Summary data from sheets in the > same ...more > <http://groups.google.com/group/excel-macros/msg/3568ab2848572?utm_source=digest_medium=email> > Back to top <#m_-7746555178834149049_digest_top> > Required break chart in excel > <http://groups.google.com/group/excel-macros/t/f69aea00658464ad?utm_source=digest_medium=email> > amar takale <amartak...@gmail.com>: Jun 08 09:47AM +0530 > > Hi friends > > Good Morning > > Any Idea? > > ...more > <http://groups.google.com/group/excel-macros/msg/33fcb75e89da6?utm_source=digest_medium=email> > Storey Thomas <storeythomas...@yahoo.com>: Jun 08 06:21AM > > > On Thu, 6/8/17, amar takale <amartak...@gmail.com> wrote: > > Subject: Re: $$Excel-Macros$$ Required break chart in excel ...more > <http://groups.google.com/group/excel-macros/msg/346cbe4a84c8e?utm_source=digest_medium=email> > Back to top <#m_-7746555178834149049_digest_top> > When Excel Save then below message show > <http://groups.google.com/group/excel-macros/t/c22a0fcb48c38c5a?utm_source=digest_medium=email> > amar takale <amartak...@gmail.com>: Jun 08 09:47AM +0530 > > ??? > > ...more > <http://groups.google.com/group/excel-macros/msg/33fd0fa159714?utm_source=digest_medium=email> > Back to top <#m_-7746555178834149049_digest_top> > You received this digest because you're subscribed to updates for this > group. You can change your settings on the group membership page > <https://groups.google.com/forum/?utm_source=digest_medium=email#!forum/excel-macros/join> > . > To unsubscribe from this group and stop receiving emails from it send an > email to excel-macros+unsubscr...@googlegroups.com. > -- *Rashid Khan* *Senior Trainer* *ExecuTrain* *AmanatSoft* *Corporate Training* *Software Development* PO Box: 26977, Dubai, UAE Tel: +97143374888, Fax: +97143374889, *Mob: +971(55)7490756 – +971(50)2323657* www.executrain.ae | www.executrain.com/dubai | *www.amanatsoft.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 https://groups.google.com/group/excel-macros. For more options, visit https://groups.google.com/d/optout.
Re: $$Excel-Macros$$ Macro to Insert Pictures according to the Cell Value in Column A
Superr...wow... Thanks a million Also thanks to De Premor for his help too. God Bless you all On Mon, Aug 3, 2015 at 9:19 PM, Mandeep Baluja rockerna...@gmail.com wrote: check once again :) Regards Mandeep Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next ' MsgBox Target.Value2 If Target.Column = 1 Then Target.Offset(0, 1).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpg).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpeg).Select With Selection.ShapeRange .Height = Target.Offset(0, 1).Height .LockAspectRatio = msoFalse .Width = Target.Offset(0, 1).Width .Line.Visible = msoTrue .Line.Weight = 0.25 End With Target.Select End If If Target.Value = Then For Each s In ActiveSheet.Shapes MsgBox s.TopLeftCell.Address MsgBox Target.Offset(0, 1).Address If Not Intersect(Target.Offset(0, 1), s.TopLeftCell) Is Nothing Then s.Delete End If Next s End If End Sub On Monday, August 3, 2015 at 6:21:28 PM UTC+5:30, prkhan56 wrote: Thanks Mandeep...for the code. One small issue I want the respective picture to be deleted Now if I delete any value in Col A then it deletes all the pictures. Can you please rectify. If the value in Col A is deleted then only the respective pictures in Col B should be deleted .. and not all the pictures Thanks once again. On Mon, Aug 3, 2015 at 4:19 PM, Mandeep Baluja rocke...@gmail.com wrote: check this out !! Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next ' MsgBox Target.Value2 If Target.Column = 1 Then Target.Offset(0, 1).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpg).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpeg).Select With Selection.ShapeRange .Height = Target.Offset(0, 1).Height .LockAspectRatio = msoFalse .Width = Target.Offset(0, 1).Width .Line.Visible = msoTrue .Line.Weight = 0.25 End With Target.Select End If If Target.Value = Then For Each s In ActiveSheet.Shapes 'MsgBox s.TopLeftCell.Address 'MsgBox s.BottomRightCell.Address If Not Intersect(Range(B1:B1), s.TopLeftCell) Is Nothing Then s.Delete End If Next s 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 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/W2CtEqVFNXA/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. -- *Rashid Khan* *Senior Trainer* *ExecuTrain* *AmanatSoft* *Corporate Training* *Software Development* PO Box: 26977, Dubai, UAE Tel: +97143374888, Fax: +97143374889, *Mob: +971(55)7490756 – +971(50)2323657* www.executrain.ae | www.executrain.com/dubai | *www.amanatsoft.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
Re: $$Excel-Macros$$ Macro to Insert Pictures according to the Cell Value in Column A
Thanks Mandeep...for the code. One small issue I want the respective picture to be deleted Now if I delete any value in Col A then it deletes all the pictures. Can you please rectify. If the value in Col A is deleted then only the respective pictures in Col B should be deleted .. and not all the pictures Thanks once again. On Mon, Aug 3, 2015 at 4:19 PM, Mandeep Baluja rockerna...@gmail.com wrote: check this out !! Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next ' MsgBox Target.Value2 If Target.Column = 1 Then Target.Offset(0, 1).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpg).Select ActiveSheet.Pictures.Insert(C:\Users\Mandeep.baluja\Desktop\a\ Target.Value2 .jpeg).Select With Selection.ShapeRange .Height = Target.Offset(0, 1).Height .LockAspectRatio = msoFalse .Width = Target.Offset(0, 1).Width .Line.Visible = msoTrue .Line.Weight = 0.25 End With Target.Select End If If Target.Value = Then For Each s In ActiveSheet.Shapes 'MsgBox s.TopLeftCell.Address 'MsgBox s.BottomRightCell.Address If Not Intersect(Range(B1:B1), s.TopLeftCell) Is Nothing Then s.Delete End If Next s 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 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/W2CtEqVFNXA/unsubscribe. To unsubscribe from this group and all its topics, 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. -- *Rashid Khan* *Senior Trainer* *ExecuTrain* *AmanatSoft* *Corporate Training* *Software Development* PO Box: 26977, Dubai, UAE Tel: +97143374888, Fax: +97143374889, *Mob: +971(55)7490756 – +971(50)2323657* www.executrain.ae | www.executrain.com/dubai | *www.amanatsoft.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.
Re: $$Excel-Macros$$ Macro to Insert Pictures according to the Cell Value in Column A
No...sorry...I have checked everything. It only takes the file 1.jpg...and not any other files. The files are there in the folder and they are in jpg format. That is the reason I sent the sample pics folder for testing on your end May be you can give me a code which should run looking at values in Col A and then insert pictures in Col B. Thanks once again for your time and help On Mon, Aug 3, 2015 at 4:35 AM, De Premor d...@premor.net wrote: Hi, Still curious with your problem, there is few more thing we need to check. 1. Make sure picture that you want to load is exist in the referenced folder on the code 2. Make sure it image with JPG format, not PNG, GIF, BMP or other image format, just JPG (the extention is .jpg) Thanks, waiting for your respond. On 01/08/2015 23:40, Rashid Khan wrote: Thanks for your explanation. But unfortunately it is not working. I am just enclosing herewith the pics which I am using for testing on your side. Regards On Sat, Aug 1, 2015 at 4:22 AM, De Premor d...@premor.net wrote: Are you sure ? i've been test and try the code, and it work for any other picture. Did you know how that code work ? let me explain a little **) **the code is in blue, and green is my comment * *'This code will only executed before you double clicking on any cells / ranges on sheet* *Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) **'If some error happen, just ignore it, ex: **picture file not found* * On Error Resume Next** 'The code will only working if target column is 1 or in otherwords = Column A* * If Target.Column = 1 Then 'it will move the cursor to select the cell on column B to place the picture * * Target.Offset(0, 1).Select 'And load the picture from the respective folder with name as name on Cell Column A that you've clicked * * ActiveSheet.Pictures.Insert(C:\Product\Pictures\ Target.Value2 .jpg).Select 'Then Resize, and make a border ** With Selection.ShapeRange* * .Height = Target.Offset(0, 1).Height* * .LockAspectRatio = msoFalse* * .Width = Target.Offset(0, 1).Width* * .Line.Visible = msoTrue* * .Line.Weight = 0.25* * End With 'Reselect the cell that you clicked before ** Target.Select* * End If* * End Sub* On 01/08/2015 3:33, Rashid Khan wrote: Thanks for the quick response. It works only for 1.jpg and not for any other pictures. Kindly look into the code thanks once again. On Sat, Aug 1, 2015 at 12:00 AM, De Premor d...@premor.net wrote: Here is the code, you can make changes or experiment with it Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) On Error Resume Next If Target.Column = 1 Then Target.Offset(0, 1).Select ActiveSheet.Pictures.Insert(C:\Product\Pictures\ Target.Value2 .jpg).Select With Selection.ShapeRange .Height = Target.Offset(0, 1).Height .LockAspectRatio = msoFalse .Width = Target.Offset(0, 1).Width .Line.Visible = msoTrue .Line.Weight = 0.25 End With Target.Select End If End Sub Rgds, [dp] On 01/08/2015 2:25, prkhan56 wrote: I am using Excel 2010 I have a problem as shown in the attached sample data In the directory C:\Product\Pictures I have many files with the names shown in Column A under the Code group eg: 1.jpg, 2.jpg ….and so on The size of inserted picture should be of the same height and width of the cell in Column B. I want a macro which when run should look up the Code number in Col A. viz: if code is 1 then it should put the pic in Column B of 1.jpg and so on an so forth If there is no value in Col A then it should do nothing otherwise put the respective pictures from C:\Product\Pictures. Any help would be really appreciated. A sample file is attached herewith TIA Rashid -- 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
Re: $$Excel-Macros$$ Macro to Insert Pictures according to the Cell Value in Column A
Thanks for the quick response. It works only for 1.jpg and not for any other pictures. Kindly look into the code thanks once again. On Sat, Aug 1, 2015 at 12:00 AM, De Premor d...@premor.net wrote: Here is the code, you can make changes or experiment with it Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) On Error Resume Next If Target.Column = 1 Then Target.Offset(0, 1).Select ActiveSheet.Pictures.Insert(C:\Product\Pictures\ Target.Value2 .jpg).Select With Selection.ShapeRange .Height = Target.Offset(0, 1).Height .LockAspectRatio = msoFalse .Width = Target.Offset(0, 1).Width .Line.Visible = msoTrue .Line.Weight = 0.25 End With Target.Select End If End Sub Rgds, [dp] On 01/08/2015 2:25, prkhan56 wrote: I am using Excel 2010 I have a problem as shown in the attached sample data In the directory C:\Product\Pictures I have many files with the names shown in Column A under the Code group eg: 1.jpg, 2.jpg ….and so on The size of inserted picture should be of the same height and width of the cell in Column B. I want a macro which when run should look up the Code number in Col A. viz: if code is 1 then it should put the pic in Column B of 1.jpg and so on an so forth If there is no value in Col A then it should do nothing otherwise put the respective pictures from C:\Product\Pictures. Any help would be really appreciated. A sample file is attached herewith TIA Rashid -- 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. -- 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/W2CtEqVFNXA/unsubscribe. To unsubscribe from this group and all its topics, 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. -- *Rashid Khan* *Senior Trainer* *ExecuTrain* *AmanatSoft* *Corporate Training* *Software Development* PO Box: 26977, Dubai, UAE Tel: +97143374888, Fax: +97143374889, *Mob: +971(55)7490756 – +971(50)2323657* www.executrain.ae | www.executrain.com/dubai | *www.amanatsoft.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
$$Excel-Macros$$ Macro to look for x in Columns and paste data in worksheet in various folders
Hello All, I am using Excel 2010 and have the following problem. I need a macro to look for x in Columns J to AX (Sample File Attached). If it finds x then it should go to the Folder “C:\Test\Macro” which contains the Folder names shown in J3 to AX3. It should open the file inside the respective Folders 1, 2, 3….etc and paste the values No1 to No5 shown in Cells A3, C3, E3, F3 H3 (see various possibility shown here). No1-No2-No3-No4-No5 No1-No2-No3 No1-No2-No3-No4 It should be concatenated with a hyphen. If any No is blank then it should not be concatenated (See Output Sheet on the sample file attached) Thanks in advance Rashid -- 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. Copy data problem for google groups.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Copy Identical Headings from various sheet to a Result sheet
Hello All, I am using Excel 2010 I have attached a sample of my problem. I have many sheets with identical set of headings on all the sheets. I need a macro which should create a Result sheet and copy Columns 1, 16, 17 and 23 for the first 10 sheets and put it on the Result Sheet. I need to copy the data starting from the Heading in Row 5 till the last active cell on all 10 Sheets. Thanks in advance Rashid Khan -- 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. Copy from 10 Sheets various Columns.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Copy Data from next Column and Repeat Paste as per the Values
Dear All, I am using Excel 2010. I have attached a sample file with my problem. Please see before and after Any macro help would be appreciate. Regards Rashid -- 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. Copy Data from Column on the right.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Macro to calculate Attendance from a Monthly Schedule
Hello All, I have duty schedule for various Staffs on various Stores. All Sheets are of same pattern. I am enclosing a Sheet with my Problem only for one Store as a Sample. I have many sheets in the workbook (50+). Each Staff name appears in a Row. Sometimes two Staff Names are in a Row (See Row 59 in the sample attached). Staff Names will be varying for other Stores. At present I am using Index Function with Countif to count the Names of Staff. (Please see in the sample). As there are more than 50+ Sheet I have to do it on each sheet manually which is time consuming and also when more than one name comes on a Row my Countif gives wrong answer. I have color coded the Staff name Rows for sake of easy explanation of my problem. I need a macro which will run on all the Sheets in this Workbook and give me the Staff Names, their count, Sheet name and the Month Value from Cell of F4. See the desired output required in Range A70:D75. Any help would be greatly appreciated. TIA Rashid -- 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/groups/opt_out. APR SCHEDULE - group.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Formula or UDF to do Vlookup for values delimited with ]
Hello All, I am attaching a sample of my problem. I need to do Vlookup from a Range which has Codes in Col A and Text in Col B. I want to have the output required (highlighted in Yellow) on Col D based on the Answers Col C. My problem is that the Codes are delimited with ]. I do not want to separate the Answers using Text to Column. I tried the following and got the desired result if there is only one code in the Answers Column. =VLOOKUP(LEFT(C2,FIND(],C2)-1),RangeCodes,2,0) As you can see in the attached sheet if there are many Codes combined together then I cannot get the desired result. Is there a formula or a UDF which can give me the desired result. Please note that there are several Columns with the Codes combined. I have just used a sample column to demonstrate my problem. TIA Rashid Khan -- 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/groups/opt_out. Group Lookup Partial.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Count No of Days between Start and End Date over a period of different years
Hello All, I am attaching a sample file for my problem. I wish to have a formula entered in Cell D2 (highlighted in yellow - *to be dragged across and down*) to calculate the number of days in Col D, E and F over different years from the Start and End Date. Thanks in advance Rashid Khan -- 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?hl=en. For more options, visit https://groups.google.com/groups/opt_out. Dates over period of years.xls Description: MS-Excel spreadsheet
$$Excel-Macros$$ Excel Graph Problem
Hello All, Is it possible to create the graph shown on the attached file as per the data shown? Regards Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com. Group Graph Tracking.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Macro to create Pivot Table for each sheet in the workbook
I posted this yesterday...it seems it did not get through..so posting once again Hello All, I am using Excel 2010. I have a List of Names in Sheet name “List” I have attached a file with two modules. *Module1* Macro creates separate sheet with the names listed in the sheet name List and copies Sheet Data for each name. *Module2* makes Pivot Table on the Active Sheet. My requirement is to amend the *Module2* as follows: 1) * **Module2* should loop through each name and create Pivot Table for each sheet created and name it viz. Pivot created for Name1 should be PivotName1, Pivot created for Name2 should be PivotName2 and so on. 2) The macro should exclude Data and List sheets. Any help would be appreciated. Thanks Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com. PIVOT - Excel Group.xlsm Description: Binary data
$$Excel-Macros$$ Macro to create Pivot Table for each Name Sheet
I posted this yesterday...it seems it did not get through..so posting once again Hello All, I am using Excel 2010. I have a List of Names in Sheet name “List” I have attached a file with two modules. *Module1* Macro creates separate sheet with the names listed in the sheet name List and copies Sheet Data for each name. *Module2* makes Pivot Table on the Active Sheet. My requirement is to amend the *Module2* as follows: 1) * **Module2* should loop through each name and create Pivot Table for each sheet created and name it viz. Pivot created for Name1 should be PivotName1, Pivot created for Name2 should be PivotName2 and so on. 2) The macro should exclude Data and List sheets. Any help would be appreciated. Thanks Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com.
Re: $$Excel-Macros$$ Abridged summary of excel-macros@googlegroups.com - 32 Messages in 8 Topics
Hello All, I am using Excel 2010. I have a List of Names in Sheet name “List” I have attached a file with two modules. *Module1* Macro creates separate sheet with the names listed in the sheet name List and copies Sheet Data for each name. *Module2* makes Pivot Table on the Active Sheet. My requirement is to amend the *Module2* as follows: 1)* **Module2* should loop through each name and create Pivot Table for each sheet created and name it viz. Pivot created for Name1 should be PivotName1, Pivot created for Name2 should be PivotName2 and so on. 2) The macro should exclude Data and List sheets. Any help would be appreciated. Thanks Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com. PIVOT - Excel Group.xlsm Description: Binary data
$$Excel-Macros$$ Highlight Worked Cells only if the Employee has worked in both areas
Hello Experts, I am using Excel 2010 and have the following problem. If an employee no. is duplicate and he has worked in both Work Areas viz EC and RTG then I wish to highlight only those Worked Cells with Yellow. I have done it manually to demonstrate my requirement in yellow. As the data shown in the attached file is part of a big work area, I would like to RUN the macro only on the Selected Range after I have selected that Range. Thanks in advance Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com. Group Highlight Problem.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Formula to Calculate Slab Wise Commission as per Targets Achieved
Hello All, We have a group of employees having various Grades and Position. 1) A fixed target of sales to be achieved every month as shown in Col D (Target). 2) Each level has different Target Criteria as shown in Col C5. 3) Commission Criteria is shown in F3:K3 4) Achievement Criteria is shown in F2:K2 5) Target achieved by each is shown in Col E5 downwards. Can anyone please provide a formula which will calculate the commission according to the Target achieved against each employee? If they achieve 75-79% they get 50% of target achieved, 80-85% then 60% and so on so forth. I require the formula in F5:K5 (red color cells) to drag it down and across to get the desired figures. Thanks Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com. Commission-Excel Group.xlsx Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
$$Excel-Macros$$ Macro to convert date at the time of entry
Hello All, I found the following function from ozgrid which reverses a text string Option Explicit Public Function ReverseString(Text As String) ReverseString = StrReverse(Text) End Function I want a macro which should reverse a date entered eg 30062012 to 20120630 as soon as *data is entered* in Col A. Any help would be appreciated. Rashid Khan -- Join official facebook page of this forum @ https://www.facebook.com/discussexcel FORUM RULES (1120+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. 6) Jobs posting is not allowed. 7) Sharing copyrighted ebooks/pirated ebooks/their links is not allowed. NOTE : Don't ever post personal or 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 post to this group, send email to excel-macros@googlegroups.com. To unsubscribe from this group, send email to excel-macros+unsubscr...@googlegroups.com.