Verwenden numerischer Kriterien aus einem Steuerelement in einem Formular

Wenn Sie das Argument kriterien für einen Vorgang basierend auf der Entscheidung eines Benutzers ändern möchten, können Sie angeben, dass die Kriterien aus einem Steuerelement in einem Formular stammen. Sie könnten z.B. angeben, dass das Argument Kriterien einem Textfeld entnommen wird, das die Personal-Nr (EmployeeID) enthält.

Wenn Sie numerische Kriterien angeben möchten, die einem Steuerelement in einem Formular entnommen werden sollen, fügen Sie in das Argument Kriterien einen Ausdruck ein, der auf das Steuerelement verweist. Dieser Steuerelementausdruck sollte vom Zeichenfolgenausdruck getrennt sein, sodass Access zuerst den Steuerelementausdruck auswertet und mit dem Rest des Zeichenfolgenausdrucks verkettet, bevor der entsprechende Vorgang ausgeführt wird.

Angenommen, Sie führen die DLookup-Funktion für eine Employees-Tabelle aus, um den Nachnamen eines Mitarbeiters basierend auf der EmployeeID-Nummer zu suchen. Im folgenden Beispiel werden die Kriterien durch den aktuellen Wert des EmployeeID-Steuerelements im Bestellformular bestimmt. Der Ausdruck, der auf das Steuerelement verweist, wird jedes Mal ausgewertet, wenn die Funktion aufgerufen wird. Wenn sich der Wert des Steuerelements ändert, spiegelt das Argument criteria diese Änderung wider.

=DLookup("[LastName]", "Employees", "[EmployeeID] = " _ 
    & Forms!Orders!EmployeeID)

Wenn der aktuelle Wert des Felds EmployeeID 7 ist, lautet das Criteria-Argument , das an die DLookup-Funktion übergeben wird:

"[EmployeeID] = 7"

Tipp

Wenn Sie Fehler im Argument criteria beheben möchten, unterteilen Sie den Ausdruck in kleinere Komponenten und testen diese einzeln im Direktfenster. Wenn alle Komponenten einwandfrei funktionieren, setzen Sie sie nacheinander wieder zusammen, bis der gesamte Ausdruck einwandfrei funktioniert.

Sie können auch eine Variable einschließen, die einen numerischen Wert in das Argument criteria darstellt. Die Variable sollte vom Zeichenfolgenausdruck getrennt sein, sodass Access zuerst die Variable auswertet und sie dann mit dem Rest des Zeichenfolgenausdrucks verkettet.

Das folgende Beispiel zeigt, wie das Argument Kriterien zusammengestellt wird, wenn es eine Variable enthalten soll:

Dim intNum As Integer 
Dim varResult As Variant 
 
intNum = 7 
varResult = DLookup("[LastName]", "Employees", _ 
    "[EmployeeID] = " & intNum)

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.