Obsah
Máte edíciu programu Excel s nainštalovaným textom na reč? Ak je to tak, môžete nechať program Excel hovoriť z kódu VBA. Nezabudnite zapnúť reproduktory.
Prevod textu na reč
Nasledujúci text bude vyslovený v bunke A1 programu ActiveSheet:
123456789 | Sub SayThisCell ()Bunky (1, 1). HovorteKoniec pod |
Toto makro nevyžaduje, aby bol text v akejkoľvek tabuľke, hovorí však o obsahu reťazca:
1234567891011121314151617 | Sub SayThisString ()Dim SayThis As StringSayThis = "Milujem Microsoft Excel"Application.Speech.Speak (SayThis)Koniec pod |