Avatar billede pecl Nybegynder
27. december 2002 - 08:39 Der er 1 kommentar og
1 løsning

#Fejl og kørselsfejl 2113

Hej
Jeg har en function der beregner noget ud fra nogle datoer (Tæl dage mellem Dato1 og Dato2) hvor jeg så bruger resultatet til beregning i et nyt felt.
Hvis der endnu ikke er skrevet en dato i Dato2 giver funktionen #Fejl og giver en kørselsfejl 2113 Værdien passer ikke til feltet.
Hvordan laver man noget som f.eks. If Felt = #fejl Then gør ingen ting ?
Avatar billede mugs Novice
27. december 2002 - 09:51 #1
Indsæt denne i starten af koden:

On Error GoTo Errorhandler
'Her følger din beregning
Errorhandler:
If RuntimeError = 2113 Then
Msg "Eet eller flere felter er tomme."
Exit Sub
Avatar billede mugs Novice
27. december 2002 - 09:57 #2
Eller i felternes BeforeUpdate Event:

If IsNull(Me.Dato1) Then
MsgBox "Du skal indtaste en værdi i Dato1"
Me.Undo
End If

Som måler om der er indtastet en værdi i Dato1 og afbryder indtastningen hvis dette er tilfældet.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester