LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,058
Default Status Bar Message

Every comment has an Author property.
This is displayed in the status bar on mouse-over.
The property is, sadly, read-only.

This little macro saves your UserName, re-assigns the UserName, re-creates
each comment on the worksheet and then re-establishes your UserName:

Sub ReNameMe()
' gsnuxx
Dim r As Range, cText As String, s As String
s = Application.UserName
Application.UserName = " "
Set rr = ActiveSheet.UsedRange.SpecialCells(xlCellTypeComme nts)
For Each r In rr
With r
cText = .Comment.Text
.ClearComments
.AddComment
.Comment.Text Text:=cText
End With
Next
Application.UserName = s
End Sub


PLEASE NOTE:

1. the macro will not the wording of the comment.
2. special comment formatting may not be preserved.

--
Gary''s Student - gsnu200815 gsnu2007k


"kirkm" wrote:


While mousing over a cell with a comment, the status bar shows Cell
[whatever] commneted by [name].

Is it possible to remove all instances of [name] ?

Thanks - Kirk

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Status Bar Message essdee Excel Programming 0 September 8th 08 05:09 PM
Status Bar Message [email protected] Excel Programming 6 September 5th 08 02:58 PM
Custom Message in Status bar Satin Excel Programming 1 May 3rd 07 02:45 PM
my message in Status bar Anita[_5_] Excel Programming 3 October 6th 04 02:46 PM
Status Message Ray Batig Excel Programming 4 December 26th 03 03:25 AM


All times are GMT +1. The time now is 03:50 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"