LibreOffice 26.2 Help
Defines the error message that is displayed when invalid data is entered in a cell.
Шумо метавонед макросро бо хабари хато оғоз намоед. Макроси намунавӣ дар охири ин саҳифа оварда шудааст.
Хабари хаторо, ки шангоми дохилкунии арзиши номувофиқ нишон дода мешавад, дар майдони Таркиб дохил кунед.
Дар ҳарду сурат, агар шумо "Ист"ро интихоб кунед, навишти номувофиқ кӯр шуда ва арзиши пешина бозгузошта мешавад. Ин ҳолат бо пӯшонидани муколамаҳои "Огоҳӣ" ва "Маълумот" бо пахшкунии Бекркунӣ низ рух медиҳад. Агар муколамаро бо пахшкунии тугмачаи 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.
Муколамаи Макросро мекушояд, ки дар он макроси дар ҳолати дохилкунии арзиши номувофиқ иҷро карда мешавад, интихоб кунед.
Номи макро ё хабари хаторо дохил кунед.
Хабари хаторо дохил кунед.
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