Opdater en form fra en Combo Box

Hvis du mener det er en ny record, er det ikke nok men en refresh, der skal en Requery til. Refresh opdaterer ku eksisterende poster.

Men hvis det er en ny post der ikke findes i tabellen, og du indtaster denne i din combo, kan du bruge combo'ens NotInList hændelse således:

Private Sub felt1_NotInList(NewData As String, Response As Integer)
DoCmd.SetWarnings False
Response = acDataErrContinue
prompt = "Denne type findes ikke i listen, ønsker du at oprette den?"
If MsgBox(prompt, vbYesNo, "Typen findes ikke!") = vbYes Then
DoCmd.RunSQL "INSERT into TABELNAVN (FELTNAVN) VALUES ('" & NewData & "')"
Response = acDataErrAdded
End If
DoCmd.SetWarnings True
End Sub

Jeg har to tabeller med FirmaId som nøgle.
Den ene med firmanavne, den ligger i combo Boxen, og den anden ligger på formen med Firmadata.
Jeg indtaster intet. Jeg vælger blot firmanavn fra combo boxen og ønsker så formens firmadata vist

Kan du sende din db som en .zip fil i en version tidligere end 2007 til:

mugs snabelting mail.dk

Desværre har jeg "kun" 2007
Men det må da kunne klares her - kan i hjælpe

Jeg har mange gange fået en bruger til at konvertere en 2007 db til en tidligere version. En sådan funktion må altså være til stede i 2007, men hvor ved jeg af gode grunde ikke.

Er der nogen der kan hjælpe ?

jeg lukker og prøver igen

x