Monday, November 22, 2004

Make Excel Talk

Found on AutomateExcel.com
Excellent stuff!

Do you have a newer edition of Excel with "Text to Speech" installed? If so, you can make Excel speak from VBA code. Don't forget to turn up your speakers.

The following will speak the text in cell A1 of the ActiveSheet:

Sub SayThisCell()
Cells(1, 1).Speak
End Sub


This next Macro doesn't require text to be in any spreadsheet, it speaks the contents of a string:

Sub SayThisString()
Dim SayThis As String

SayThis = "I love Microsoft Excel"
Application.Speech.Speak (SayThis)

End Sub