Tags:
vba
hej alle jeg har lavet følgende:
Sub Registrering()
Dim BilNr, Brændstoftype, Kmprliter As Single
Range("A1") = "BilNr"
Range("B1") = "Brændstoftype"
Range("C1") = "Kmprliter"
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveCell = InputBox("Indtast bilens nummer")
ActiveCell.Offset(0, 1).Range("A1").Select
Brændstoftype = InputBox("Hvilken brændstoftype bruger bilen")
ActiveCell = Brændstoftype
ActiveCell.Offset(0, 1).Range("A1").Select
Kmprliter = InputBox("Indtast værdien for km. pr. liter for bilen")
ActiveCell = Kmprliter
ActiveCell.Offset(0, 1).Range("A1").Select
End Sub
Jeg skal lave følgende: værdi for km. pr. liter er rimelig(værdier som f.eks. 56 eller 3 kan afvises ud fra en rimelighedsvurdering).
hvordan laver man sådan en grænse i Visual basic i excel?