В этом совете описывается, как указать Excel отслеживать определенную ячейку и, когда значение ячейки изменится, давать словесное оповещение, используя возможность преобразования текста в речь. Для этого применяется макрос, являющийся обработчиком событий и названный Worksheet_Calculate.

Макрос Worksheet_Calculate нужно поместить в модуль кода для листа, содержащего ячейку, которая будет отслеживаться. Самый простой способ активизировать этот модуль кода — щелкнуть правой кнопкой мыши на вкладке листа и выбрать в контекстном меню команду Исходный текст.

Следующий код предполагает, что ячейка А1 содержит итоговое значение и является ячейкой, за которой выполняется слежение. Для каждого из шести условий используется разная фраза. Например, если ячейка А1 содержит значение 1050, то Excel скажет: «Вы превысили бюджет». Вы можете, конечно, добавить столько условий, сколько вам захочется, и настроить числовые диапазоны для обработки этих условий.

1
2
3
4
5
6
7
8
9
10
11
12

Private Sub Worksheet_Calculate()
    With Application.Speech
    Select Case Range("A1")
        Case Is < 600: .Speak "Значительно ниже бюджета"
        Case 600 To 900: .Speak "В рамках бюджета"
        Case 901 To 999: .Speak "Подходим близко к бюджету"
        Case 1000: .Speak "Вы точно укладываетесь в бюджет"
        Case 1001 To 1100: .Speak "Вы превысили бюджет"
        Case Is > 1100: .Speak "Вас скоро уволят"
    End Select
    End With
End Sub