Hi

I have an excel spread sheet and on the last column on the right hand side I have some comment boxes but when I hover over them they pop up to the right of the cell, and then they are off the screen.

I got help with the code from a member on this site so can I alter it to make the comment box pop up to the left side of the cell please

Sub AdjustComments()
     
  Dim c As Range, r As Range
   
  Set r = Range("M1:M100") 'adjust range reference as needed
   
  Application.ScreenUpdating = False
   
  On Error Resume Next
   
  For Each c In r
    If Not c.Comment Is Nothing Then
      With c.Comment.Shape
        .Height = 250
        .Width = 190
        .Left = c.Offset(0, 1).Left
        .Top = c.Offset(1, 1).Top
      End With
      With c.Comment.Shape.TextFrame.Characters.Font
       .Name = "Calibri"
       .Size = 9
       .Bold = False
      End With
    End If
  Next c
  
  Set r = Nothing
  
  Application.ScreenUpdating = True
   
End Sub
Is it possible to adapt this code to get me the desired results or will it have to be a separate one

Also i'm not sure if I have the code right because if I run the macro then open a comment box in the (M) column as in the code the comment box is the default size then if I run the macro again once I have the little red tick in the corner of the it changes to what the code says.