Hello. One way would be to place this on the "ThisWorkbook" module.

Private Sub Workbook_Open()
With Application.Speech
.Speak "Hello " & Application.UserName, False
.Speak "Cell C 3 contains " & [C3].Text, True
End With
End Sub

HTH. :)
--
Dana DeLouis
Win XP & Office 2003


"PCOR" wrote in message
...
Hi
I have the text to speech module working very well.
Here is what I would like to do with it
How can I have the voice "speak" the entry at C3 when the speadsheet is
first opened?
Thanks