Felmeddelande

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

Du kan starta ett makro med ett felmeddelande ocksÄ. LÀngst ned pÄ den hÀr sidan finns ett exempelmakro.

SÄ hÀr anvÀnder du det hÀr kommandot...

Choose Data - Validity - Error Alert tab.


Visa felmeddelande nÀr ogiltiga vÀrden matas in

Visar det felmeddelande som du har skrivit in i omrÄdet InnehÄll nÀr ogiltiga data skrivs in i en cell. NÀr alternativet Àr aktiverat visas meddelandet för att förhindra ogiltiga inmatningar.

I bÄda fallen gÀller att om du markerar "Stopp" tas inmatningen bort och det tidigare vÀrdet ÄterstÀlls i cellen. Detsamma gÀller om du stÀnger dialogrutorna "Varning" och "Information" genom att klicka pÄ Avbryt. Om du stÀnger dialogrutorna med OK tas den ogiltiga inmatningen inte bort.

InnehÄll

ÅtgĂ€rd

Markera Ă„tgĂ€rden som du vill ska vidtas nĂ€r ogiltiga data matas in i en cell. ÅtgĂ€rden "Stopp" hindrar den ogiltiga inmatningen och visar en dialogruta som du mĂ„ste stĂ€nga genom att klicka pĂ„ OK. ÅtgĂ€rderna "Varning" och "Information" visar dialogrutor som du kan stĂ€nga genom att klicka pĂ„ OK eller Avbryt. Den ogiltiga inmatningen hindras bara om du klickar pĂ„ Avbryt.

VĂ€lj ut

Öppnar dialogrutan Makro dĂ€r du kan markera makrot som körs nĂ€r ogiltiga data matas in i en cell. Makrot körs efter att felmeddelandet visats.

Rubrik

Skriv in rubriken för makrot eller felmeddelandet som du vill ska visas nÀr ogiltiga data matas in i en cell.

Felmeddelande

Skriv in meddelandet som du vill ska visas nÀr ogiltiga data matas in i en cell.

Sample macro:

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