Skip to content

Instantly share code, notes, and snippets.

@royninja
Created February 28, 2017 06:18
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save royninja/d1a39b734b589094ffb0f2fd32a50091 to your computer and use it in GitHub Desktop.
Save royninja/d1a39b734b589094ffb0f2fd32a50091 to your computer and use it in GitHub Desktop.
this script will ask you to enter a message and it will deliver your text over voice
Dim message, sapi
message = InputBox("Text to Audio converter"+vbcrlf+"by whoami","Text to Audio")
Set sapi = CreateObject("sapi.spvoice")
sapi.Speak message
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment