Results 1 to 2 of 2
  1. #1
    Join Date
    Sep 2006

    Unanswered: Location of comment

    Can you designate the location of the comment when it pulls up using vba.
    I want to center it on the page.


  2. #2
    Join Date
    Oct 2003
    Again, Tom Urtis has written something that might work for you:

    Sub CommentFitter2()
        Application.ScreenUpdating = False
        Dim x As Range, y As Long
        For Each x In Cells.SpecialCells(xlCellTypeComments)
            Select Case True
            Case Len(x.NoteText) <> 0
                With x.Comment
                    .Shape.TextFrame.AutoSize = True
                    If .Shape.Width > 250 Then
                        y = .Shape.Width * .Shape.Height
                        .Shape.ScaleHeight 0.9, msoFalse, msoScaleFromTopLeft
                        .Shape.ScaleWidth 1#, msoFalse, msoScaleFromTopLeft
                    End If
                End With
            End Select
        Next x
        Application.ScreenUpdating = True
    End Sub
    old, slow, and confused
    but at least I'm inconsistent!

    (retired Excel 2003 user, 3/28/2008)

    How to ask a question on forums

Posting Permissions

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