How could the sub below be amended so that when the activecell is changed to
another via the arrow keys, the comment which was displayed (in the previous
activecell) is hidden again (like mousing over). Currently it stays
displayed. Thanks

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' GS
Dim cmt As Comment
Set cmt = Target.Comment
If cmt Is Nothing Then
Exit Sub
End If
Target.Comment.Visible = True
End Sub