Содержание
У вас есть версия Excel с установленной функцией преобразования текста в речь? Если это так, вы можете заставить Excel говорить с помощью кода VBA. Не забудьте включить динамики.
Текст в речь
Следующее будет озвучивать текст в ячейке A1 ActiveSheet:
123456789 | Sub SayThisCell ()Ячейки (1, 1). ГоворитеКонец подписки |
Этот макрос не требует наличия текста в какой-либо электронной таблице, он озвучивает содержимое строки:
1234567891011121314151617 | Sub SayThisString ()Dim SayThis As StringSayThis = "Я люблю Microsoft Excel"Application.Speech.Speak (SayThis)Конец подписки |