LibreOffice 7.3 laguntza
Defines the error message that is displayed when invalid data is entered in a cell.
Makro bat ere errore-mezu batekin has dezakezu. Makro baten adibidea ikus dezakezu orrialde honen amaieran.
Edukia arean idatzi duzun errore-mezua bistaratzen du gelaxka batean baliogabeko datuak sartzen direnean. Gaituta badago, mezua bistaratuko da sarrera baliogabe bat saihesteko.
Bi kasuotan, "Gelditu" hautatze duzunean, baliogabeko sarrera ezabatu egingo da, eta aurreko balioa berriro sartuko da gelaxkan. Berdina gertatuko da "Abisua" eta "Informazioa" elkarrizketak ixtean Utzi botoian klik eginez. Ados botoia sakatuz ixten badituzu elkarrizketa-koadroak, baliogabeko sarrera ez da ezabatuko.
Hautatu zein ekintza gertatzea nahi duzun gelaxka batean baliogabeko datuak sartzean. "Gelditu" ekintzak ezetsi egiten du baliogabeko edozein sarrera, eta Ados botoia sakatuz itxi beharreko elkarrizketa-koadro bat bistaratzen du. "Abisua" eta "Informazioa" ekintzekin elkarrizketa-koadro bat bistaratuko da, Ados edo Utzi sakatuz itxi beharrekoa. Utzi sakatuz bakarrik ezetsi daiteke baliogabeko sarrera.
Makroaren elkarrizketa-koadroa irekiko da; gelaxka batean baliogabeko datuak sartzean exekutatuko den makroa hauta dezakezu bertan. Errore-mezua bistaratu ondoren exekutatuko da makroa.
Sartu gelaxka batean baliogabeko datuak sartzean bistaratzea nahi duzun makroaren titulua edo errore-mezua.
Sartu gelaxka batean baliogabeko datuak sartzean bistaratzea nahi duzun mezua.
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