Feilmelding

Lagar feilmeldinga som skal visast nÄr det vert skrive inn ugyldige data i ei celle.

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

Nedanfor er det eit eksempel pÄ ein funksjon som kan kallast opp nÄr det skjer ein feil. Merk at makroen tek inn to parameter som vert sende vidare av LibreOffice nÄr funksjonen vert kalla opp:

Funksjonen mÄ returnera ein Boolsk verdi. Viss han returnerer Sann, vert den innskrivne verdien ikkje endra. Viss funksjonen returnerer Usann, vert den innskrivne verdien sletta og den fÞrre verdien brukt.


    Function ExampleValidity(CellValue as String, CellAddress as String) as Boolean
        Dim msg as String
        Dim iAnswer as Integer
        Dim MB_FLAGS as Integer
        msg = "Ugyldig verdi: " & "'" & Celleverdi & "'"
        msg = msg & " i cella: " & "'" & Celleadresse & "'"
        msg = msg & Chr(10) & "Godta likevel?"
        MB_FLAGS = MB_YESNO + MB_ICONEXCLAMATION + MB_DEFBUTTON2
        iAnswer = MsgBox (msg , MB_FLAGS, "Feilmelding")
        ExampleValidity = (iAnswer = IDYES)
    End Function