formular vises ikke?

Cant you change "tilladtilføjelser" to Ja when the user presses the button?

Problemet er, at knapperne også forsvinder. Problmet opstår kun, når der ikke er data i tabellen. Når brugeren trykker på knappen skifter tilladtilføjelser status til ja.

Is the button in the header of the form? You could try putting the form into another form as a sub form. Then Put the button on the main form

Hej

Nu ved jeg jo ikke hvor mange felter du har på din formular, men en metode kunne være at låse alle felter, og så låse dem op når der klikkes på på knappen "Opret"

Du kan låse felterne som standard i design på formen under fanebladet Data, og låse dem med nedenstående kode:

Me!FeltNavn.Locked = False
Me!FeltNavn1.Locked = False

osv.

Hvis du rigtig mange felter kan man også lave en løkke der løber alle felter igennem og låser dem, man kan evt. bruge egenskaben Mærke (Tag) til dette.

Sorry, Låse dem er selvfølgelig Låse dem op :o)

Hej Anders
Den går ikke for mig. Jeg har en del felter, og det drejer sig om flere forms.
Jeg i stedet 2 funktioner som jeg kalder når felterne skal åbnes / lukkes.

Function lockfields()
With Me.Form
.AllowEdits = False
.AllowDeletions = False
.AllowAdditions = False
End With
End Function

Function unlockfields()
With Me.Form
.AllowAdditions = True
.AllowEdits = True
.AllowDeletions = True
End With
End Function

Hej moba, det fint ud, men så vidt jeg ved skal formen sættes til Tilad nye poster = Ja for at felterne vises

Jeg anvender ofte nedenstående, måske du kan bruge den. Sørg for at egenskaben for nye poster er sat til Ja, og alle felter skal som standard være låst når formen åbnes, nedenstående kode skal så køres når du klikker på knappen:

Dim Ctrl As Control
For Each Ctrl In Me
If Ctrl.ControlType = acTextBox Then Ctrl.Locked = False
If Ctrl.ControlType = acComboBox Then Ctrl.Locked = False
Next Ctrl

Ja såfremt der ikke er data i tabellen så er det åbenbart konklutionen? Så snart der er data i tabellen er det jo ikke noget problem

Nej, det fordi Access ikke kan vise felterne på formen når egenskaben for nye poster er sat til Nej, og der samtidig ikke er nogele poster i den underliggende tabel, men mit sidste indlæg virker ganske godt

Nedenstående er testet og virker, bemærk at der er til kode til at gå til en ny post efter Next Ctrl

Dim Ctrl As Control
For Each Ctrl In Me
If Ctrl.ControlType = acTextBox Then Ctrl.Locked = False
If Ctrl.ControlType = acComboBox Then Ctrl.Locked = False
Next Ctrl
DoCmd.GoToRecord , , acNewRec