There is this code I came across while surfing around the net.
I want to be able to display the message alert while the for loop is still running. I can't do that yet. It's has now become a nightmare hunting me.
My goal is to make it behave like this:Sub TestVoices() Dim i As Long Dim voc As SpeechLib.SpVoice Set voc = New SpVoice i = [RANDBETWEEN(0,2)] Set voc.Voice = voc.GetVoices.Item(i) voc.Speak "I want to run next lines while voice is playing" MsgBox i End Sub
Application. Speech.Speak "Hello", SpeakAsync:=True MsgBox " I am here"
I have this posted on mrexcel.com last week. I have not received the needed solution and I have decided to try this forum too. I just hope I am not breaking any rules.
Thanks in advance
Link:
I tried placing link to the other post. But have the alert I am not allowed to do that.
Bookmarks