Feilmelding

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

Du kan ogsÄ byrja ein makro med ei feilmelding. Eit eksempel pÄ ein slik makro er vist sist pÄ denne sida.

For Ă„ bruka denne funksjonen 


Vel Data → Validitet → Feilmelding.


Vis feilmelding nÄr ugyldige verdiar vert skrivne inn.

Viser feilmeldinga du skreiv inn i Innhald nÄr ugyldige data vert skrive inn i ei celle. Om du ikkje har merkt av, vert meldinga vist for Ä hindra ei ugyldig oppfÞring.

I begge tilfelle gjeld det at viss du vel «Stopp», vert det ugyldige elementet sletta og den fĂžrre verdien vert sett inn pĂ„ nytt i cella. Det same gjeld viss du lukker dialogvindauga «Åtvaring» og «Informasjon» ved Ă„ trykkja pĂ„ Avbryt-knappen. Viss du lukker dialogvindauga med knappen OK, vert ikkje det ugyldige elementet sletta.

Innhald

Handling

Marker handlinga som du Ăžnskjer skal utfĂžrast nĂ„r ugyldige data vert skrivne inn i ei celle. «Stopp»-handlinga avviser det ugyldige elementet og viser eit dialogvindauge som du er nĂžydd til Ă„ lukka ved Ă„ klikka OK. «Åtvaring» og «Informasjon»-handlingane viser eit dialogvindauge som kan lukkast ved Ă„ klikka pĂ„ OK eller Avbryt. Det ugyldige elementet vert avvist berre nĂ„r du trykkjer Avbryt.

Bla gjennom

Opnar dialogvindauget for makroar, der du kan velja ein makro som skal kÞyrast nÄr ugyldige verdiar vert skrive inn i ei celle. Makroen skal kÞyrast etter at feilmeldinga er vist.

Tittel

Skriv inn tittelen pÄ makroen eller feilmeldinga som skal visast nÄr ugyldige data vert skrive inn i ei celle.

Feilmelding

Skriv inn meldinga som skal visast nÄr ugyldige verdiar vert skrivne inn i ei celle.

Eksempelmakro

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:

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