Could someone help here please, I'm trying to position
a Comment beside a Form. Using this... which almost
works. r is the Col and row where the comment is.

--
Sub Showc(ByVal r)
Dim rng As Range
Dim cTop
Set rng = ActiveWindow.VisibleRange
cTop = rng.Top + rng.Height / 2
With Worksheets("Sheet1").Range(r)
If Not .Comment Is Nothing Then
With .Comment
With .Shape
.Top = cTop - 215
.Left = Range("M11").Left + 47
End With
.Visible = True
End With
End If
End With
Set rng = Nothing
End Sub
--

The problem is the left position. For some reason it varies.
I haven'e been able to workout a relationship between the
right hand side of the Form - yet, or see if using that is better

..Left in the above is 700 odd; MyForm Left + width is 300ish.

Thanks - Kirk