Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Amend sub to re-hide comment when activecell change to another
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 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Amend sub to re-hide comment when activecell change to another
Hi Max,
The following appears to work. You might want to experiment a little with it... '-- Private Sub Worksheet_SelectionChange(ByVal Target As Range) ' GS Dim cmt As Comment Set cmt = Target.Comment Application.DisplayCommentIndicator = xlNoIndicator If cmt Is Nothing Then Exit Sub Target.Comment.Visible = True End Sub -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Max" wrote in message 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 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Amend sub to re-hide comment when activecell change to another
Thanks, Jim. That works, but it switches off all comment indicators in the
book and I can't mouse over to show the comments anymore. Is there a way to have both functionalities available & working simultaneously? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Amend sub to re-hide comment when activecell change to another
Max,
There may not be a way, without going to elaborate MouseMove code. This is as close as I can come for now. (my head hurts)<g Jim '-- Private Sub Worksheet_SelectionChange(ByVal Target As Range) ' GS Dim cmt As Comment Set cmt = Target.Comment Application.DisplayCommentIndicator = xlNoIndicator If cmt Is Nothing Then Application.DisplayCommentIndicator = xlCommentIndicatorOnly Else Application.DisplayCommentIndicator = xlCommentIndicatorOnly Target.Comment.Visible = True End If End Sub '-- "Max" wrote in message Thanks, Jim. That works, but it switches off all comment indicators in the book and I can't mouse over to show the comments anymore. Is there a way to have both functionalities available & working simultaneously? |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Amend sub to re-hide comment when activecell change to another
That worked marvellous, Jim!
Many thanks, Max |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
2007 / Hide Comment / How? | Excel Discussion (Misc queries) | |||
How do I hide the comment indicators on a web page? | Excel Discussion (Misc queries) | |||
Need to Change ActiveCell | Excel Programming | |||
Amend code or change it completely? | Excel Programming | |||
code to change activecell | Excel Programming |