Yes; it worked also for me, but I'm guessing we're all using Eloquence, but I'm guessing David is using something else?
I suspect whether it works or not is highly dependent upon which synthesizer is being used. This is what I found when I was trying to change the sound of the voice; I got it to work with Eloquence and Dectalk, but I think it usually didn't work for me with SAPI or any of the others. David, I have routines for changing voice parameters in the Word Advanced Features app in an object named "SpeechParameters", and you could have a look at them to see if they help you. I had to add a "DoEvents" command when I was changing some attribute, as well as a small "sleep" like Kevin is suggesting. Chip -----Original Message----- From: Jeff Weiss [mailto:[email protected]] Sent: Friday, June 20, 2014 11:03 AM To: [email protected] Subject: RE: Temporarily slowing down speech rate, what am I doing wrong? David, I put this in a function and it seems to work just fine. I made it slower--rate 20 to emphasize the difference. Here is the app: ' rate change Dim myHotkey : Set myHotkey = Keyboard.RegisterHotkey("Alt-Control-Shift-I","Funct") Function Funct() ActiveSettings.Screen.Rate = 50 Speak "This text is spoken with normal speed" ActiveSettings.Screen.Rate = 20 'Attempting to slow down speech. Speak "but we also can have it done more lazily." ActiveSettings.Screen.Rate = 50 'Back to normal. Speak "Yet, we will keep things the good old way." End Function Jeff Weiss -----Original Message----- From: Kevin Huber [mailto:[email protected]] Sent: Friday, June 20, 2014 9:43 AM To: [email protected] Subject: Re: Temporarily slowing down speech rate, what am I doing wrong? Hi David: Did you try putting Sleep commands after the Rate statements like sleep 30 or sleep 50 I'm just guessing, but those sleep commands may give Window-eyes to respond to the rate commands. I have done this in my scripts and sometimes it had an effect but sometimes it didn't, I'm not sure why, but it might be worth a try. You can increase or decrease the number to whatever works. Kevin Huber On 6/19/14, David <[email protected]> wrote: > '---Code snip--- > ActiveSettings.Screen.Rate = 50 'Now we are sure what we have for an > outset. > Speak "This text is spoken with normal speed" > ActiveSettings.Screen.Rate = 30 'Attempting to slow down speech. > Speak "but we also can have it done more lazily." > ActiveSettings.Screen.Rate = 50 'Back to normal. > Speak "Yet, we will keep things the good old way." > '---End Of Snip--- > > Guys, > I have inserted a small snip of a code, above. When running this code, > I had it perform the middle SPEAK command in a slower rate, but only once. > Why it worked once, I have been unable to determine. I have run it > numerous times, and the rate does not slow down. I tried with some > sleep commands, both ahead of - and behind - the ActiveSettings instructions. > All the sleep command did, was to insert initial pause before the > speech would ever start out. > > Am I doing something wrong in my code? Did I miss some instructions? > Or, is my idea of being able to slow down in the middle of a line of > speak commands, totally lost behind any possibility? > > Thanks for any feedback and suggestions, that might lead me on the > right track. > > >
