Как конвертировать текст заметки PowerPoint в речь с помощью VBA

Question

Я хочу написать макрос VBA, который преобразует текст заметки в речь, используя речевые возможности Windows.
Кто-нибудь делал это раньше?
Любые советы, как начать и продолжить?
В конце мне нужно будет предоставить разные языки ЕС для конвертации.
Спасибо Джон.

Answer 1

Правильно, как уже упоминалось выше, добавить ссылку в свой проект в библиотеку объектов речи Microsoft.

Тогда эта функция укажет вам правильный путь:

Function SpeakThis(myPhrase As String)
  Dim oSpeaker As New SpeechLib.SpVoice

  ' Set speech properties
  oSpeaker.Volume = 100 ' percent
  oSpeaker.Rate = 1 ' multiplier
  oSpeaker.SynchronousSpeakTimeout = 1
  oSpeaker.AlertBoundary = SVEWordBoundary

  If Not myPhrase = "" Then oSpeaker.Speak myPhrase, SVSFDefault
End Function

Тогда назовите это:

SpeakThis "Hello, my name is Jamie and I love VBA!"