Hi Baha,

Try this on an a worksheet.

Under Insert Object Create New scroll down to Wave Sound OK

With your microphone at the ready, click on the RED dot and record your
message, click on the BLACK square when done with message.

Dismiss the "Sound Object in Book2" by clicking on the X and you will be
left with a EMBED("SoundRec","") which will be named something like Object 9
in the name box if you click on the speaker icon.

Assign similar code to a button from the Forms tool bar to play your
recorded message.

Sub MyVoice()
ActiveSheet.Shapes("Object 9").Select
Selection.Verb Verb:=xlPrimary
End Sub

You can move the speaker to a remote spot by the click and drag method if
needed.

HTH
Regards,
Howard

"Baha" wrote in message
om...
Hi All,
I want to create userform with one button which allows me to record my
voice directly.Is that possible on excel?Can anyone type me code for
that?Your help is greatly appreciated.
Thanks million,