Speech facility

[Guest]

Hi,

There is a speech facility in Excel which is great for my work but I would
like to have it where Excel uses the speech facility on opening a
workbook....sort of a welcome and basic instruction as soon as the file is
opened.

Is this possible??

Jon

 

[Dave Peterson]

You could use a macro:

Option Explicit
Sub auto_open()
Dim myStr As String

Select Case Time
Case Is <= TimeSerial(12, 0, 0)
myStr = "Good Morning"
Case Is <= TimeSerial(18, 0, 0)
myStr = "Good Afternoon"
Case Else
myStr = "Good Evening"
End Select

With Application
.Speech.Speak Text:=myStr & " " & .UserName
End With

End Sub

 

[Dave Peterson]

ps...

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

 

[Guest]

Really excellent - thanks Dave!

You could use a macro:

Option Explicit
Sub auto_open()
Dim myStr As String

Select Case Time
Case Is <= TimeSerial(12, 0, 0)
myStr = "Good Morning"
Case Is <= TimeSerial(18, 0, 0)
myStr = "Good Afternoon"
Case Else
myStr = "Good Evening"
End Select

With Application
.Speech.Speak Text:=myStr & " " & .UserName
End With

End Sub