Now:
click on a cell; do a ctrl+; ctrl+shift; <my initials> keep on typing.
Like to do:
click on a cell: <something> keep on typing.
Can you assist?
and assign a shortcut key like CNTRL-e to it.
--
Gary''s Student - gsnu200805
I think he wants the current date/time and his initials in the cell
Sub dergf()
ActiveCell.Value = Now & " Your Initials Here"
End Sub
Done: I've defined ctrl+q to this macro, but it closes the cell.
Want: I want ctrl+q to behave as if I've typed Ctrl+; ctrl+shift+; <space>
dmw ...and allow me to keep typing. You have the first part.... now the ...
dmw
Support: entering the existing keyboard hotkeys Ctrl+; ctrl+shift+; keeps
you in the cell to continue typing. The above macro created somehow
generates a "return" that closes the cell. I don't want the cell closed....
must be an option somewhere, as we are "dis" close. (And thank you again, so
far, so good)
dmw
"sbi...@gmail.com" wrote:
> On Sep 18, 1:35 pm, Gary''s Student
> <GarysStud...@discussions.microsoft.com> wrote:
> > --
> > Gary''s Student - gsnu200805
> Sub dergf()
> ActiveCell.Value = Now & " Your Initials Here"
> End Sub
The macro has to be run first then F2 to edit and type what you want.
Gord Dibben MS Excel MVP
Since the embedded hotkey leaves the cell in edit mode.... what method could
be used for me to do the same :-)
Type the text you want into the cell, then run the code, modified as
such.
ActiveCell.Value = Now & " Your Initials Here " & ActiveCell.Value
This appends the existing value that you type in first, after the date
and your initials.
HTH,
Steven
On Sep 19, 12:29 am, DWM dr.wireMORE
Another method, perhaps overkill
Sub Human()
Dim MyString as String
MyString = InputBox("Please enter text here")
ActiveCell.Value = Now & " Your Initials Here " & MyString
End Sub
Steven
"sbi...@gmail.com" wrote: