Office: (Office 2010) Eine Dublettenkontrolle einbauen im Formular

M-Deniz-S · 15. März 2016

Moin Maike...

hier ist der Code...

Code:

Private Sub eawauswahl_AfterUpdate()
Me.Recordset.FindFirst "EAWNr = '" & Me.EAWNr & "'"
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Also...Wenn ID nicht ausgeblendet wäre, wäre es das erste Feld.

Ich habe versucht den Code auf "ID" umzuschreiben, aber das funktioniert auch nicht...Fehler: Datentypenkonflikt.
Wenn ich im Debuggen reinschaue und mit dem Cursor dann auf "Me.ID" halte, zeigt er beispielsweise eine ID an.

ich habe mal in die Datensatzherkunft reingeschaut und auch nicht verdächtiges gefunden...
SELECT EAW.ID, EAW.[EAWNr] FROM EAW ORDER BY EAW.[EAWNr];

Ergänzung:

Ich habe mal deinen Code mit einer Ergänzung in ein Textfeld übertragen. Dort funktioniert
es, solange "Daten eingeben" auf "Nein" steht.
Code:

Private Sub eawsuche_AfterUpdate()
Me.Recordset.FindFirst "EAWNr = '" & Me!eawsuche & "'"
If Me.Recordset.NoMatch Then
MsgBox "Die Nummer existiert nicht."
End If
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Gibt es eine andere Möglichkeit das frm auf "0" zu setzen?

maikek · 15. März 2016

Was ist denn jetzt das Kombi mit "ID" in der ersten Spalte (ob ausgeblendet ist egal, die gebundene zählt) - eawauswahl oder EAWNr?
ID ist normalerweise eine Zahl und dann müssen die Hochkommata weg.
Code:

Private Sub eawauswahl_AfterUpdate()
Me.DataEntry = False
With Me.Recordset
.FindFirst "ID = " & Me.eawauswahl
If .NoMatch Then
MsgBox "Die Nummer existiert nicht."
End If
End With
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

maike

M-Deniz-S · 15. März 2016

Es kann sein, dass ID die erste Spalte im Kombifeld war, aber die ist ja jetzt nicht mehr da. Ich will ja nur die EAWNr suchen/aussuchen.

Also so wie Du es hast, ist es richtig!

Danke...

Warum funktioniert nun der Code nicht mit "EAWNr" und den Hochkommatas?

maikek · 15. März 2016

Es kann sein, dass ID die erste Spalte im Kombifeld war, aber die ist ja jetzt nicht mehr da. Ich will ja nur die EAWNr suchen/aussuchen.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

*confused.gif*
Im Moment weiß ich nicht mehr, was jetzt der aktuelle Stand ist, ID oder EAWNr, Kombifeld oder Textfeld ....

Prinzipiell kannst du Datentyp Zahl nur mit Zahl und Datentyp Text mit Text vergleichen, sonst hast du eben den gemeldeten Datentypkonflikt.

maike

M-Deniz-S · 16. März 2016

Sorry, dass es gerade so konfus ist...

Also...dein Code habe ich nun im Kombifeld eingetragen und funktioniert auch so.

Ich hatte nur ein Textfeld zum Gegenprüfen eingebaut, um zu sehen, warum es hakt.

Das Textfeld wurde nun entfernt, da Dein Code im Kombifeld wie gewünscht funktioniert.
Soweit alles gut.

Warum kann ich nun nicht im Code "EAWNr" mit "ID" einfach umtauschen, um dasselbe Ergebnis zu bekommen...klar die Kommatas auch noch setzen, da EAWNr vom Typ "Text" ist.

maikek · 16. März 2016

Weil EAWNr die zweite (?) Spalte im Kombi ist.
Umtauschen:
Code:

.FindFirst "EAWNr = '" & Me.eawauswahl.Column(1) & "'"
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Column(1) ist die zweite Spalte.
maike

Office: (Office 2010) Eine Dublettenkontrolle einbauen im Formular

Eine Dublettenkontrolle einbauen im Formular

Eine Dublettenkontrolle einbauen im Formular

Eine Dublettenkontrolle einbauen im Formular

Eine Dublettenkontrolle einbauen im Formular - Similar Threads - Dublettenkontrolle einbauen Formular

"=Wenn" in VBA in eine hochzählende .range einbauen

Schleife einbauen

Progressbar einbauen

ODBC Anbindung zur SQL Datenbank in Access Frontend einbauen

Forms: Stream-Video einbauen

"ODER" Abfrage in Formel einbauen

Tabelle mit AB und BIS Datum - Abfrage einbauen