Lang L: none (table-of-contents)
Kas teil on Exceli väljaanne, kuhu on installitud tekst kõneks? Kui jah, saate panna Exceli rääkima VBA -koodist. Ärge unustage kõlareid sisse lülitada.
Tekst kõneks
Järgmine räägib ActiveSheet'i lahtris A1 olevat teksti:
| 123456789 | Sub SayThisCell ()Lahtrid (1, 1). RääkigeEnd Sub |
See makro ei nõua teksti ühegi arvutustabeli lisamist, see räägib stringi sisu:
| 1234567891011121314151617 | Sub SayThisString ()Dim SayThis As StringSayThis = "Ma armastan Microsoft Excelit"Application.Speech.Speak (SayThis)End Sub |
