"værdien" " - -" i et tomt felt i en tabel

Hvis du med udtrykket "uden indtastninger" mener en ny post, kan du bruge flg:

If Me.NewRrecord Then
Felt1 = "- -"
End If

Indsættes i formularens Vedaktuel (Oncurrent) event

der må evt. være noget andet der initierer at feltet skal være =  "- -"

I feltets standardværdi for nye poster, kan du i tabellen også indtaste.

"- -"

Begrundelse for at værdien "- -" automatisk fremkommer er at der ved senere udskrift ikke må kunne tilføjes nogetsomhelst (forfalskning)på et eksamensbevis.
Det kræver at jeg laver en makro ved:
If Me.NewRrecord Then
Felt1 = "- -"
End If
Hvordan klarer jeg let dette. Jeg skal lige bemærke at jeg ikke er særlig god til dette, men kan nok guides videre.

Åbn din formular i designvisning > højreklik udenfor formularen > Egenskaber < Fanen Hændelser > når du er her sætter du markøren i linien VedAktuel (OnCurrent) > Tryk på de 3 små ... i højre side > Kodegenerator < du er nu inde i VBA-Editoren og her indsætter du din kode.

Kan du konvertere til Access97 kan du sende filen til mig :

mugs@mail.dk

Ps.: Det har ikke noget at gøre med makroer.

Har forsøgt i denne hvor feltnavnet er b2:

Option Compare Database
Option Explicit

Private Sub b2_BeforeUpdate(Cancel As Integer)
If Me.NewRrecord Then
b2 = "- -"
End If


End Sub

Private Sub Form_Current()
End Sub
......dette har ingen virkning. Jeg har mange feltnavne ...vil det sige at jeg skal lave noget for hver eneste felt i kodegeneratoren.

....Kan ikke umiddelbart lave min database til Access97.

Kan man ikke tildele værdien "- -" i tabeldesignet.

Jo i tabeldesign som jeg skrev i min kommentar kl 23:18:02

Du hatr indsat koden i feltets BeforeUpdate event. Den skal indsættes i formularens VedAktuel (OnCurrent) hændelse.

Når du indsætter i feltets hændelsesegenskaber har det kun betydning for det eller de felter du skriver til. Men i dette tilfælde vil du, når du oppretter en ny post, sætte et felt til "- -". derfor er du nødt til at måle på selve formularen. Derfor skal du vælge formularegenskaber og ikke feltets egenskaber, og indtaste koden:

If Me.NewRecord Then
o.s.v.

Me refererer til den altid aktive formularer, og koden vil eksekveres hvis betingelsen er opfyldt:

Hvis jeg ny post så
felt1 = "- -"
slut på hvis sætning

eller på udenbysk:

If Me.newRecord Then
felt1 = "- -"
End If

I kommandoen skal du tilføje alle felter der skal tildeles værdien:

If Me.newRecord Then
felt1 = "- -"
felt2 = "- -"
felt3 = "- -"
End If

Jeg kan strikke et eksempel sammen hvis du lægger din email.

Eksempel er klar.

Du skriver at du gerne vil lave det i dit tabeldesign.
Så kan du jo bare sætte defaultværdien på feltet til "- - " så skulle den være hjemme.
Sorba

Sorba -> Korrekt, som jeg skrev kl 23:18:02

Har tidligere prøvet med at indsætte "- -" i feltets standardværdi i tabeldesign for nye poster. Dette slår imidlertidig ikke igennem.

Jeg vil da meget meget gerne modtage et eksempel fra dig mugs!! Min email er pederlundnielsen@orangenet.dk

Eksempel sendt idet jeg har gjort opmærksom på, at efter rettelse i tabeldesign, skal feltet igen trækkes ind i formularen. Det er også muligt at ændre standardværdien i formularens felt i Egenskaber > fanen Data > standardværdi.

Tak for den STORE hjælp.
Jeg mener at svaret må give ekstra 30 point.

Opretter lige nyt spm. med ekstrapoint til mugs.