Помощ за LibreOffice 26.2
Дефинира съобщението за грешка, което да се показва при въвеждане на невалидни данни в клетка.
Можете да стартирате и макрос със съобщение за грешка. В края на тази страница е даден примерен макрос.
Показва съобщението за грешка, въведено в областта Съдържание, при въвеждане на невалидни данни в клетка. Ако няма отметка, съобщението се показва за предотвратяване на невалиден вход.
И в двата случая, ако изберете „Спиране“, невалидните данни се изтриват и в клетката се връща предишното й съдържание. Същото важи и ако затворите диалоговите прозорци „Предупреждение“ и „Информация“ чрез бутона Отказ. Ако използвате бутона OK, невалидната стойност не се изтрива.
Select the action that you want to occur when invalid data is entered in a cell.
The Stop action rejects the invalid entry and displays a dialog that you have to close by clicking OK.
The Warning and Information actions display a dialog that can be closed by clicking OK or Cancel. The invalid entry is only rejected when you click Cancel.
The Reject Silently action keeps the current cell value and does not display a dialog.
Отваря диалоговия прозорец Макрос, в който можете да изберете макроса, който да се изпълни при въвеждане на невалидни данни в клетка. Макросът се изпълнява след показването на съобщението за грешка.
Въведете заглавието на макроса или съобщението за грешка, което да се показва при въвеждане на невалидни данни в клетка.
Въведете съобщението, което желаете да се показва при въвеждане на невалидни данни в клетка.
Следва примерна функция, която може да бъде извикана при възникване на грешка. Обърнете внимание, че макросът приема два параметъра, които се предават от LibreOffice, когато функцията се извиква:
CellValue: стойността, въведена от потребителя, като низ.
CellAddress: адресът на клетката, в която е въведена стойността, като низ с префикс името на листа (например: "Лист1.A1").
Функцията трябва да връща булева стойност. Ако тя върне True, въведената стойност се запазва. Ако функцията върне False, въведената стойност се изтрива и се възстановява предишната.
Function ExampleValidity(CellValue as String, CellAddress as String) as Boolean
Dim msg as String
Dim iAnswer as Integer
Dim MB_FLAGS as Integer
msg = "Невалидна стойност: " & "'" & CellValue & "'"
msg = msg & " в клетката: " & "'" & CellAddress & "'"
msg = msg & Chr(10) & "Да бъде ли приета все пак?"
MB_FLAGS = MB_YESNO + MB_ICONEXCLAMATION + MB_DEFBUTTON2
iAnswer = MsgBox (msg , MB_FLAGS, "Съобщение за грешка")
ExampleValidity = (iAnswer = IDYES)
End Function