No one can test unless the other macro I posted is present in the workbook.

Did you also copy the CommentDateTimeAdd macro into a general module in the
workbook?

Did you change "Allskeds.xls" to your workbook name?

That was the name of my workbook when I tested the macro and the workbook_open
event code.


Gord

On Fri, 11 Jan 2008 23:59:41 +0100, "KP" wrote:

Hi,
Yesterday I asked the following question in this group:

When I right click "Insert comment", I want the date and time to be
standard in
the comment box just below the first default line with the username.

I want it to be available already when I open the file without having to
run
the macro manually or by shortcut selection.

In addition, is it possible - in the same macro - to change the first line
with username from bold to plain text.

--------------------------------------------------------------
I received the following answer:

To add the macro to the right-click menu...............

Add this to Thisworkbook module

Private Sub Workbook_Open()
With Application.CommandBars("Cell").Controls("Insert Comment")
.OnAction = "Allskeds.xls" & "!CommentDateTimeAdd"
End With
End Sub

Gord Dibben MS Excel MVP
---------------------------------------------
However, this will not work. Probably because I have done something wrong.
The above macro has been inserted in Thisworkbook module.
When I right click Insert Comment, just the ordinary default username (with
bold) is inserted in the comment box and no date. The macro has no effect at
all.
Should it in addition be assigned in some other way?
If somebody could test the macro and tell me what to do to solve the
problem, I would appreciate it very much.
I am running Excel 2003.
Thank you.

K. Pedersen