Real-Time Text To Speech, Anyone?

  • Thread starter Thread starter New Hope
  • Start date Start date
N

New Hope

Here's the scenario:

In Cell A1 there is a numeric value in the format $1.2406. That value
is being supplied via DDE Link from a Third-Party in Real-Time.

As the value changes, I want Excel to "speak" the value WITHOUT me
having to hit the return key, or WITHOUT having it "speak" an entire
column or row.

Sounds simple enough, but I've found nothing in Excel Help for Macros
that deal with this matter.

How can I make this happen on a single Cell using a live (real-time)
DDE link? There has to be a way to point the TTS engine to a single
cell reference and look to see if the value has changed - then -
execute the TTS command upon "any" delta/change it finds. Or,
something like that I would guess.

Thanks in advance for your support!
 
I am not sure what Event would be appropriate to use for triggering a macro.
You could maybe use the "OnTime" command and check the value in A1 every few
seconds. I would be curious what would be the best event for you DDE link
if you find it.

Here is some code to get you started with a few ideas. I use Speech often.
I find it fun having the computer talk back to you.

Option Explicit
Public Say As Speech
Public OldValue As Double

Private Sub Worksheet_Calculate()
If Say Is Nothing Then Set Say = Application.Speech

If [A1] < 10 Then
Say.Speak "Danger Will Robinson"
Say.Speak "Stock is below $10"
End If

If OldValue <> [A1].Value Then
OldValue = [A1].Value
Say.Speak "Cell A1 has new value of"
Say.Speak [A1].Text
End If
End Sub
 
Many thanks, Dana!

I'll try the code to see if I can fashion something together. Not sure
about the "Public" declarations, but I hope to be able to put something
together. If it works, I'll post back here to let you what I did.

Again - thanks!

New Hope
 
Back
Top