Действия при ошибке

Defines the error message that is displayed when invalid data is entered in a cell.

Также можно определить макрос, работающий с сообщением об ошибке. Пример такого макроса приведён в конце этой страницы.

Доступ к этой команде

Choose Data - Validity - Error Alert tab.

Показывать сообщение об ошибке при вводе недопустимых значений.

Отображает сообщение об ошибке, выводимое в области Содержание при вводе недействительных данных. Если эта функция включена, то сообщение позволяет предотвратить ввод недействительной информации.

В обоих случаях, если выбрано «Остановить», введённые недопустимые данные удаляются и в ячейку вводится ранее содержавшееся в ней значение. То же самое происходит, если закрыть диалоговое окно предупреждения или уведомления кнопкой Отмена. При закрытии диалогового окна кнопкой ОК неправильные данные не удаляются.

Содержимое

Действие

Выберите действие, которое должно выполняться при вводе неверных данных в ячейку. Действие "Остановить" приводит к отбрасыванию неверных данных и выводу диалогового окна, которое нужно закрыть кнопкой ОК. Действия "Предупреждение" и "Информация" приводят к выводу диалогового окна, которое можно закрыть кнопкой ОК или Отмена. Неверные данные отбрасываются только при нажатии кнопки Отмена.

Обзор

Будет открыто диалоговое окно Макрос, где можно выбрать макрос, который будет выполняться при вводе неверных данных в ячейку. Макрос выполняется после вывода сообщения об ошибке.

Заголовок

Введите заголовок макроса или сообщения об ошибке, которое будет выдаваться при вводе неверных данных в ячейку.

Сообщение об ошибке

Выберите сообщение, которое должно отображаться при вводе неверных данных в ячейку.

Sample macro:

Below is a sample function that can be called when an error occurs. Note that the macro takes in two parameters that are passed on by LibreOffice when the function is called:

CellValue: The value entered by the user, as a String.
CellAddress: The address of the cell where the value was entered, as a String prefixed with the sheet name (e.g: "Sheet1.A1").

The function must return a Boolean value. If it returns True, the entered value is kept. If the function returns False, the entered value is erased and the previous value is restored.


    Function ExampleValidity(CellValue as String, CellAddress as String) as Boolean
        Dim msg as String
        Dim iAnswer as Integer
        Dim MB_FLAGS as Integer
        msg = "Invalid value: " & "'" & CellValue & "'"
        msg = msg & " in cell: " & "'" & CellAddress & "'"
        msg = msg & Chr(10) & "Accept anyway?"
        MB_FLAGS = MB_YESNO + MB_ICONEXCLAMATION + MB_DEFBUTTON2
        iAnswer = MsgBox (msg , MB_FLAGS, "Error message")
        ExampleValidity = (iAnswer = IDYES)
    End Function