Cellinnehållets validitet

Du kan definiera vilka villkor som gäller för varje cell. Därigenom hindras inmatning av ogiltiga värden i en cell.

Validitetsregeln aktiveras när ett nytt värde matas in. Om ett ogiltigt värde redan har matats in i cellen eller om du infogar ett värde i cellen genom att dra och släppa eller kopiera och klistra in, gäller inte validitetsregeln.

Du kan när som helst välja Verktyg - Detektiv och visa celler som innehåller ogiltiga värden genom att välja kommandot Ringa in ogiltiga data.

Så här arbetar du med giltighet för cellinnehåll

Markera cellerna som du vill definiera en ny validitetsregel för.
Välj Data - Validitet.
På fliken Kriterier ska du ange villkoren för nya värden som anges i celler.
Välj ett alternativ i fältet Tillåt.
Om du markerar "Heltal" tillåts inte värden som "12,5". Om du väljer "Datum" tillåts datuminformation i både lokalt datumformat och i form av seriellt datumtal. På samma sätt tillåts med villkoret "Tid" tidsvärden som t.ex. "12:00" eller seriella tidstal. Med "Textlängd" menas att celler bara får innehålla text.

Välj "Lista" för att ange en lista över giltiga poster.
Välj nästa villkor under Data. Beroende på vad du väljer kan du markera ytterligare alternativ.

När du har bestämt villkoren för cellvaliditeten kan du med hjälp av de andra två flikarna skapa meddelanderutor:

Under fliken Inmatningshjälp anger du rubriken och texten till den tipshjälp som ska visas när cellen markeras.
Under fliken Felmeddelande väljer du vad som ska hända vid en felaktig inmatning.

Om du markerar åtgärden "Stopp" accepteras inte ogiltiga inmatningar och det tidigare cellinnehållet blir kvar.

Markera "Varning" eller "Information" om du vill att en dialogruta ska visas där posten antingen kan tas bort eller accepteras.

Om du markera "Makro", kan du genom att använda knappen Bläddra ange ett makro som ska köras om ett fel inträffar.

Om du vill visa felmeddelandet markerar du Visa felmeddelande när ogiltiga värden matas in.

Exempelmakro:

Function ExampleValidity(CellValue as String, TableCell as String)
Dim msg as string
msg = "Invalid value: " & "'" & CellValue & "'"
msg = msg & " in table: " & "'" & TableCell & "'"
MsgBox msg ,16,"Error message"
End Function

Om du ändrar åtgärden som är knuten till en cell under fliken Felmeddelande och avslutar dialogrutan med OK måste du först markera en annan cell innan ändringen blir verksam.

Data - Validitet