Another excellent link from Al Vachris:
A random example from the site is the code below, which will let your computer quote Hamlet to you:
Public Sub say() Dim TextA As Variant, i As Long Dim sTerm As String, spv As Object TextA = Selection.Value Set spv = CreateObject("SAPI.SpVoice") If IsArray(TextA) = True Then For i = 1 To UBound(TextA) sTerm = TextA(i, 1) spv.Speak sTerm Next i Else spv.Speak TextA End If Set spv = Nothing End Sub
See http://ramblings.mcpher.com/Home/excelquirks/snippets/speak for more details, and download the sample spreadsheet below from Text2Speech.xlsb
Pingback: Daily Download 27: Miscellaneous | Newton Excel Bach, not (just) an Excel Blog
Good article , I learned a lot from the information . Does someone know where my assistant might grab a sample a form version to fill out ?