Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default Changing the size of Comment Shapes

I need to change the size on a great many comments on a Worksheet. I find
that this code:

Selection.ShapeRange.ScaleHeight 1.6, msoFalse, msoScaleFromTopLeft

will change, but relative to the default size. I can't find the syntax to
change to Height and Width settings.

Also, how can I change the default size?

Thanks for any help.

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default Changing the size of Comment Shapes

Sub ac()
Range("B9").Comment.Shape.Height = 40
Range("B9").Comment.Shape.Width = 80
End Sub


--
Regards,
Tom Ogilvy




"Randy Harris" wrote in message
...
I need to change the size on a great many comments on a Worksheet. I find
that this code:

Selection.ShapeRange.ScaleHeight 1.6, msoFalse, msoScaleFromTopLeft

will change, but relative to the default size. I can't find the syntax to
change to Height and Width settings.

Also, how can I change the default size?

Thanks for any help.



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default Changing the size of Comment Shapes


"Tom Ogilvy" wrote in message
...
Sub ac()
Range("B9").Comment.Shape.Height = 40
Range("B9").Comment.Shape.Width = 80
End Sub


--
Regards,
Tom Ogilvy


Thanks. You make it seem so simple. I couldn't figure it out. I must have
some sort of mental block or something.

Again, thanks,
Randy Harris

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 7,247
Default Changing the size of Comment Shapes

Randy,

Try something like

Dim CMT As Comment
Set CMT = ActiveSheet.Comments(1)
CMT.Shape.Height = 100
CMT.Shape.Width = 200

I don't believe you can change the default size.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Randy Harris" wrote in message
...
I need to change the size on a great many comments on a
Worksheet. I find
that this code:

Selection.ShapeRange.ScaleHeight 1.6, msoFalse,
msoScaleFromTopLeft

will change, but relative to the default size. I can't find
the syntax to
change to Height and Width settings.

Also, how can I change the default size?

Thanks for any help.



  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 903
Default Changing the size of Comment Shapes


Hi Randy,
Another option is a close fitting comment.

Resizing All Cell Comments (#resizing)
http://www.mvps.org/dmcritchie/excel...t.htm#resizing

The following may be a fixup if you have serious problems for size of the comment box. (Format, Alignment, Automatic size). .

Sub FitComments()
Dim c As Comment
For Each c In ActiveSheet.Comments
c.Shape.TextFrame.AutoSize = True
Next c
End Sub
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

"Randy Harris" wrote in message ..
I need to change the size on a great many comments on a Worksheet.





Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How do i change the size of multiple shapes at the same time? Amber Excel Discussion (Misc queries) 0 September 25th 08 09:14 PM
how do i reformat text size in all comment boxs to a default size bwnsgr96 Excel Worksheet Functions 1 August 20th 08 09:35 PM
Size of Shapes changes when the Zoom level changes Curtis Excel Discussion (Misc queries) 5 May 1st 08 10:30 PM
Auto Size shapes MichaelSpy2008 Excel Discussion (Misc queries) 0 March 26th 08 04:11 PM
changing comment indicator size or shape Mrocka Excel Worksheet Functions 1 December 13th 04 02:53 PM


All times are GMT +1. The time now is 09:33 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"