Kombinationsboks_AfterUpdate Run-time error 2115

Er det fordi Tekst57 ikke er en combobox? Måske kan du bruge

Tekst57.Caption = basis & "-1"

Glem det. Det ændrer ikke noget.

Er der nogen speciel grund til at du ikke anvender Me eller lignende. F.eks.

Private Sub Kombinationsboks55_AfterUpdate()
Me!Kombinationsboks55.SetFocus
basis = Me!Kombinationsboks55.Text
Me!Tekst57.SetFocus
Me!Tekst57.Text = basis & "-1"
End Sub

Hvorfor ikke nøjes med dette:

Me.basis = Me.kombinationsboks55
Me.Tekst57 = Me.basis & "-1"

er ikke helt med mugs??

superjap <-- får stadig sammen fejl..

Så vidt jeg kan se, vil du blot tildele feltet basis værdien i combo55, og derefter tekst57 samme værdi + -1. det kan du gøre med min kode.
Den er afprøvet i en lille testdb.

Hvorfor vil du sætte focus på felterne?

nej basis er bare en variabel .. jeg sætter forcus for ellers får jeg Run-time error 2185 "Du kan ikke referere til en egenskab eller metode for et kontrolelement, hvis detikke har focus"

I så fald mangler du at erklære din variabel:
Private Sub felt1_AfterUpdate()
Dim basis1 As String
basis1 = Me.felt1
Me.Tekst4 = basis1 & "-1"
End Sub

Afprøvet og fungerer.

har prøvet dette og sammen fejl:

Dim basis1 As String
Kombinationsboks55.SetFocus
basis1 = Me.Kombinationsboks55
Tekst57.SetFocus
Tekst57.Text = basis1 & "-1"

Kan du sende db til:

mugs@mail.dk

er jeg sgu ikke meget for er stor..og der ligger MANGE data i! har haft det problem før og aldrig fundet en løsning kan ikke helt forstå hvad det får det kun når jeg bruger AfterUpdate() kan da ikke helt passe det skulle virke andre steder og ikke hos mig

Tag en kopi og slet data. Opret en par dummy-poster og komprimer, zip og send.
Mine forslag er afprøvet i en lille testdb som jeg kan sende dig.

mail sendt

Modtaget. Når comboen tildeles en værdi bliver denne tildelt Tekst2 i formularen. Så det fungerer perfekt!

er ikk helt med ? jeg får Run-time error 2115

Er det i min db du får fejl?
Her skifter jeg blot værdi i comboen, og Tekst4 får automatisk samme værdi + -1 f.eks

c -1

er du sikker på, at din Access er korrekt installeret?

du har ikk sendt noget med

undskyld det er mig den blev blokeret

er du ikke på messenger?

Jo det kan jeg se i min Sendt-bakke. Er du sikker på, at du kan modtage .mdb-filer. zipper og sender igen.

Nej ikke messenger

ok

hvorfor skal hotmail bestemme hvad jeg må modtage? det er jeg da lidt sur over

Sendt som zip.

virker sådan her:
Dim basis1 As String
Me.felt1.SetFocus
basis1 = Me.felt1.Text
Me.Tekst4 = basis1 & " -1"

mange tak for hjælpen

Selv tak. Godnat.