DCount mit zwei Kriterien

Computer: Software & Programmierung Microsoft Access
#1

Liebe Wissende,

ich gebe über ein Formular [Rechnungsbuch] Rechnungen ein. Dabei lasse ich eine Warnmeldung ausgeben, wenn eine externe Rechnungsnummer bereits existiert:

Private Sub Externe_Rechnungsnummer_BeforeUpdate(Cancel As Integer)
If DCount("*", „Rechnungsbuch“, _
„[Externe Rechnungsnummer]=’“ & Me![Externe Rechnungsnummer] & „’“) > 0 Then
MsgBox „Vorsicht! Diese Rechnungsnummer wurde bereits vergeben!“

End If
End Sub

Jetzt möchte ich aber - da das zweite Jahr der Eintragungen stattfindet - prüfen, ob ausschließlich in diesem Jahr bereits so eine Rechnung schon existiert. Konkret also, ob bereits ein Datensatz in der Tabelle [Rechnungsbuch] existiert, bei dem die Formularfelder [Externe_Rechnungsnummer] und [Übergabe_Jahr] beide gleichzeitig identisch sind mit dem Datensatz in der Tabelle [Rechnungsbuch]; entsprechende Feldbezeichnungen dabei: [Externe_Rechnungsnummer];[Jahr].

Ist jemand so freundlich und kann obigen Code für mich abändern? Herzlichen Dank!

fshbb

#2

Aktualisierung:
Liebe Wissende,

habe mal experimentiert und recherchiert… bei folgendem Code

If DCount("*", „Rechnungsbuch“, _
„[Externe Rechnungsnummer]=’“ & Me![Externe Rechnungsnummer] & „‚and [Jahr]=‘“ & Me![Übergabe_Jahr] & „’“) > 0 Then…

brachte er mir die Meldung

„Laufzeitfehler 3464:smiley:atentypen in Kriterienausdruck unverträglich“ - ?

Was mache ich falsch?

MfG,

fshbb

#3

Hallo,

ich gebe über ein Formular [Rechnungsbuch] Rechnungen ein.
Dabei lasse ich eine Warnmeldung ausgeben, wenn eine externe
Rechnungsnummer bereits existiert:

Private Sub Externe_Rechnungsnummer_BeforeUpdate(Cancel As
Integer)

If DCount("*", „Rechnungsbuch“, _

„[Externe Rechnungsnummer]=’“ & Me![Externe
Rechnungsnummer] & „’ And [Jahr] =“ & Me![Übergabe_Jahr]) > 0 Then

MsgBox „Vorsicht! Diese Rechnungsnummer wurde bereits
vergeben!“

End If

End Sub

Jetzt möchte ich aber - da das zweite Jahr der Eintragungen
stattfindet - prüfen, ob ausschließlich in diesem Jahr bereits
so eine Rechnung schon existiert. Konkret also, ob bereits ein
Datensatz in der Tabelle [Rechnungsbuch] existiert, bei dem
die Formularfelder [Externe_Rechnungsnummer] und
[Übergabe_Jahr] beide gleichzeitig identisch sind mit dem
Datensatz in der Tabelle [Rechnungsbuch]; entsprechende
Feldbezeichnungen dabei: [Externe_Rechnungsnummer];[Jahr].

Ist jemand so freundlich und kann obigen Code für mich
abändern? Herzlichen Dank!

fshbb

Gruß

Franz,DF6GL

#4

Herzlichen Dank!

Freundliche Grüße,

fshbb