Re: $$Excel-Macros$$ Comments
Thanks sir Really great job Problem Solved Thanks once again Regards Shrinivas On Fri, Nov 29, 2013 at 12:40 PM, Ravinder ravinderexcelgr...@gmail.comwrote: PFA…I think u r looking for this…. *From:* excel-macros@googlegroups.com [mailto: excel-macros@googlegroups.com] *On Behalf Of *Shrinivas Shevde *Sent:* Friday, November 29, 2013 11:11 AM *To:* excel-macros@googlegroups.com *Subject:* Re: $$Excel-Macros$$ Comments Dear Ravindra Pankaj Marvelous job done ,really great. Can I get little more help With the current solution provided by both of you is working fine. Currently I am getting all the comments in single cel actually I want this comments in different lines Please find attached example Regards Shrinivas On Thu, Nov 28, 2013 at 12:37 PM, Ravinder ravinderexcelgr...@gmail.com wrote: Pfa…. *From:* excel-macros@googlegroups.com [mailto: excel-macros@googlegroups.com] *On Behalf Of *Shrinivas Shevde *Sent:* Thursday, November 28, 2013 11:53 AM *To:* excel-macros@googlegroups.com *Subject:* Re: $$Excel-Macros$$ Comments Waiting for Reply On Wed, Nov 27, 2013 at 2:18 PM, Shrinivas Shevde shrinivas...@gmail.com wrote: Dear all I have excel sheet in which I added comments in many cell. I want to get all the comments in row one below another may be any order. In one sheet there are more than 40 comments and such I have 16 to 18 sheets Can any one help me to write code which will do this. Sheet is attached -- Shrini -- 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. -- Shrini -- 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. -- 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
Re: $$Excel-Macros$$ Comments
Dear Ravindra Pankaj Marvelous job done ,really great. Can I get little more help With the current solution provided by both of you is working fine. Currently I am getting all the comments in single cel actually I want this comments in different lines Please find attached example Regards Shrinivas On Thu, Nov 28, 2013 at 12:37 PM, Ravinder ravinderexcelgr...@gmail.comwrote: Pfa…. *From:* excel-macros@googlegroups.com [mailto: excel-macros@googlegroups.com] *On Behalf Of *Shrinivas Shevde *Sent:* Thursday, November 28, 2013 11:53 AM *To:* excel-macros@googlegroups.com *Subject:* Re: $$Excel-Macros$$ Comments Waiting for Reply On Wed, Nov 27, 2013 at 2:18 PM, Shrinivas Shevde shrinivas...@gmail.com wrote: Dear all I have excel sheet in which I added comments in many cell. I want to get all the comments in row one below another may be any order. In one sheet there are more than 40 comments and such I have 16 to 18 sheets Can any one help me to write code which will do this. Sheet is attached -- Shrini -- 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. -- Shrini -- 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. -- 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. -- Shrini -- 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
Re: $$Excel-Macros$$ Comments
Waiting for Reply On Wed, Nov 27, 2013 at 2:18 PM, Shrinivas Shevde shrinivas...@gmail.comwrote: Dear all I have excel sheet in which I added comments in many cell. I want to get all the comments in row one below another may be any order. In one sheet there are more than 40 comments and such I have 16 to 18 sheets Can any one help me to write code which will do this. Sheet is attached -- Shrini -- 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. -- Shrini -- 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.
RE: $$Excel-Macros$$ Comments
Pfa.. From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Shrinivas Shevde Sent: Thursday, November 28, 2013 11:53 AM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Comments Waiting for Reply On Wed, Nov 27, 2013 at 2:18 PM, Shrinivas Shevde shrinivas...@gmail.com wrote: Dear all I have excel sheet in which I added comments in many cell. I want to get all the comments in row one below another may be any order. In one sheet there are more than 40 comments and such I have 16 to 18 sheets Can any one help me to write code which will do this. Sheet is attached -- Shrini -- 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 mailto:excel-macros%2bunsubscr...@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. -- Shrini -- 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. -- 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. commentssummary.xlsm Description: application/vnd.ms-excel.sheet.macroenabled.12
Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In
Hi Daniel Works perfect. I am very pleased with your help. Regards Charlie On Wed, Jul 20, 2011 at 10:04 PM, Daniel dcolarde...@free.fr wrote: My last effort ; see attached file. ** ** *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* mardi 19 juillet 2011 22:56 *À :* excel-macros@googlegroups.com *Objet :* Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In ** ** Hi Daniel Sorry to say, still doing the same thing. I am using Excel2000 and Win7. Appreciate yur comments. Thankyou Charlie On Tue, Jul 19, 2011 at 10:37 PM, Daniel dcolarde...@free.fr wrote: Sorry. Hope this one is better. Daniel *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* mardi 19 juillet 2011 06:27 *À :* excel-macros@googlegroups.com *Objet :* Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In Hi Daniel Thanks for a great result. Not quite there yet. When double click the comment box doubles it size. When cursor is moved away from that cell and then back to that cell the double size is still there sometimes. Sometimes it does go back to normal but not all the time. So when the comments has been double clicked and then closed by moving the cursor, when looking at that comments again it should be normal size. Hope I have explained well. Thankyou Charlie On Mon, Jul 18, 2011 at 10:27 PM, Daniel dcolarde...@free.fr wrote: Hi, Have alook at the attached workbook. You need a standard module where you paste : Public Res As String In the sheet module, paste : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(ActiveSheet.Cells.SpecialCells(xlCellTypeComments), Target) _ Is Nothing Then Exit Sub Cancel = True If Res Then With Range(Res).Comment.Shape .Height = .Height / 2 .Width = .Width / 2 End With End If Res = Target.Address With Target.Comment.Shape .Height = .Height * 2 .Width = .Width * 2 End With End Sub Regards. Daniel *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* lundi 18 juillet 2011 09:56 *À :* excel-macros@googlegroups.com *Objet :* $$Excel-Macros$$ Comments Boxes - Temporary Zoom In Hi Ashish and all I have a spreadsheet (thanks to Ashish) that uses comments boxes. The size of the box is great. But on some occassions the user will want to see a larger box. I know it can be increased thru edit and resize etc but is there a way to say have a right click where the size could double. When finished and user goes to another box the box size returns to standard.*** * Another option may be to have a shortcut key to double the size of active comments box, return to standard size when finished. Have Googled with no luck. Thankyou everyone Charlie Harris -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel
Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In
try this Sub reduce() Dim a As Range For Each a In Cells.SpecialCells(xlCellTypeComments) a.Comment.Visible = False a.Comment.Shape.TextFrame.AutoSize = True Next a End Sub On Tue, Jul 19, 2011 at 9:56 AM, Cab Boose swch...@gmail.com wrote: Hi Daniel Thanks for a great result. Not quite there yet. When double click the comment box doubles it size. When cursor is moved away from that cell and then back to that cell the double size is still there sometimes. Sometimes it does go back to normal but not all the time. So when the comments has been double clicked and then closed by moving the cursor, when looking at that comments again it should be normal size. Hope I have explained well. Thankyou Charlie On Mon, Jul 18, 2011 at 10:27 PM, Daniel dcolarde...@free.fr wrote: Hi, Have alook at the attached workbook. You need a standard module where you paste : ** ** Public Res As String ** ** In the sheet module, paste : ** ** Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(ActiveSheet.Cells.SpecialCells(xlCellTypeComments), Target) _ Is Nothing Then Exit Sub Cancel = True If Res Then With Range(Res).Comment.Shape .Height = .Height / 2 .Width = .Width / 2 End With End If Res = Target.Address With Target.Comment.Shape .Height = .Height * 2 .Width = .Width * 2 End With End Sub ** ** Regards. Daniel ** ** *De :* excel-macros@googlegroups.com [mailto: excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* lundi 18 juillet 2011 09:56 *À :* excel-macros@googlegroups.com *Objet :* $$Excel-Macros$$ Comments Boxes - Temporary Zoom In ** ** Hi Ashish and all I have a spreadsheet (thanks to Ashish) that uses comments boxes. The size of the box is great. But on some occassions the user will want to see a larger box. I know it can be increased thru edit and resize etc but is there a way to say have a right click where the size could double. When finished and user goes to another box the box size returns to standard.** ** Another option may be to have a shortcut key to double the size of active comments box, return to standard size when finished. Have Googled with no luck. Thankyou everyone Charlie Harris -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- *Regards* * * *Ashish Koul* *akoul*.*blogspot*.com http://akoul.blogspot.com/ http://akoul.posterous.com/ *akoul*.wordpress.com http://akoul.wordpress.com/ My Linkedin Profile http://in.linkedin.com/pub/ashish-koul/10/400/830 P Before printing, think about the environment. -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at
Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In
Hi Daniel Sorry to say, still doing the same thing. I am using Excel2000 and Win7. Appreciate yur comments. Thankyou Charlie On Tue, Jul 19, 2011 at 10:37 PM, Daniel dcolarde...@free.fr wrote: Sorry. Hope this one is better. ** ** Daniel ** ** *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* mardi 19 juillet 2011 06:27 *À :* excel-macros@googlegroups.com *Objet :* Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In ** ** Hi Daniel Thanks for a great result. Not quite there yet. When double click the comment box doubles it size. When cursor is moved away from that cell and then back to that cell the double size is still there sometimes. Sometimes it does go back to normal but not all the time. So when the comments has been double clicked and then closed by moving the cursor, when looking at that comments again it should be normal size. Hope I have explained well. Thankyou Charlie On Mon, Jul 18, 2011 at 10:27 PM, Daniel dcolarde...@free.fr wrote: Hi, Have alook at the attached workbook. You need a standard module where you paste : Public Res As String In the sheet module, paste : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(ActiveSheet.Cells.SpecialCells(xlCellTypeComments), Target) _ Is Nothing Then Exit Sub Cancel = True If Res Then With Range(Res).Comment.Shape .Height = .Height / 2 .Width = .Width / 2 End With End If Res = Target.Address With Target.Comment.Shape .Height = .Height * 2 .Width = .Width * 2 End With End Sub Regards. Daniel *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* lundi 18 juillet 2011 09:56 *À :* excel-macros@googlegroups.com *Objet :* $$Excel-Macros$$ Comments Boxes - Temporary Zoom In Hi Ashish and all I have a spreadsheet (thanks to Ashish) that uses comments boxes. The size of the box is great. But on some occassions the user will want to see a larger box. I know it can be increased thru edit and resize etc but is there a way to say have a right click where the size could double. When finished and user goes to another box the box size returns to standard.*** * Another option may be to have a shortcut key to double the size of active comments box, return to standard size when finished. Have Googled with no luck. Thankyou everyone Charlie Harris -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel ** ** -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group
Re: $$Excel-Macros$$ Comments Boxes - Temporary Zoom In
Hi Daniel Thanks for a great result. Not quite there yet. When double click the comment box doubles it size. When cursor is moved away from that cell and then back to that cell the double size is still there sometimes. Sometimes it does go back to normal but not all the time. So when the comments has been double clicked and then closed by moving the cursor, when looking at that comments again it should be normal size. Hope I have explained well. Thankyou Charlie On Mon, Jul 18, 2011 at 10:27 PM, Daniel dcolarde...@free.fr wrote: Hi, Have alook at the attached workbook. You need a standard module where you paste : ** ** Public Res As String ** ** In the sheet module, paste : ** ** Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(ActiveSheet.Cells.SpecialCells(xlCellTypeComments), Target) _ Is Nothing Then Exit Sub Cancel = True If Res Then With Range(Res).Comment.Shape .Height = .Height / 2 .Width = .Width / 2 End With End If Res = Target.Address With Target.Comment.Shape .Height = .Height * 2 .Width = .Width * 2 End With End Sub ** ** Regards. Daniel ** ** *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] *De la part de* Cab Boose *Envoyé :* lundi 18 juillet 2011 09:56 *À :* excel-macros@googlegroups.com *Objet :* $$Excel-Macros$$ Comments Boxes - Temporary Zoom In ** ** Hi Ashish and all I have a spreadsheet (thanks to Ashish) that uses comments boxes. The size of the box is great. But on some occassions the user will want to see a larger box. I know it can be increased thru edit and resize etc but is there a way to say have a right click where the size could double. When finished and user goes to another box the box size returns to standard.*** * Another option may be to have a shortcut key to double the size of active comments box, return to standard size when finished. Have Googled with no luck. Thankyou everyone Charlie Harris -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel -- -- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel