Results 1 to 3 of 3

Thread: Comments (97)

  1. #1
    Lounger
    Join Date
    Apr 2005
    Location
    Smyrna, Georgia, USA
    Posts
    31
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Comments (97)

    I am working with a spreadsheet that has 100's of Comments. I would like to know if there is some way to format ALL Comments at one time instead of clicking in and formatting them one at a time. Is there a way to set the default on the properties for the Object Positioning to "Move but don't size with cell."

    Any help would be greatly appreciated.
    Dee

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Comments (97)

    You can run this macro (copy it into a standard module):

    Sub SetCommentsToMoveNotSize()
    Dim wsh As Worksheet
    Dim cmt As Comment
    For Each wsh In ActiveWorkbook.Worksheets
    For Each cmt In ActiveSheet.Comments
    cmt.Shape.Placement = xlMove
    Next cmt
    Next wsh
    End Sub

  3. #3
    Lounger
    Join Date
    Apr 2005
    Location
    Smyrna, Georgia, USA
    Posts
    31
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Comments (97)

    Thanks Hans,

    Worked beautifully!

    Dee

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •