If-Abfrage Access VBA

Hallo zusammen,

ich habe ein kleines Problem und komme auch nicht mehr weiter.

Ich habe in Access zwei verschiedene Tabellen. Auf dem ersten Tabellenblatt "Importtabelle" stehen in der ersten Spalte Zahlen willkürlich Zahlen zwischen 1 und 30. In der zweiten Spalten stehen willkürlich Zahlen zwischen 1 und 6.

Auf dem zweiten Tabellenblatt "Durchführungen" stehen in der ersten Spalte die Zahlen zwischen 1 und 30 in aufsteigender Reihenfolge und in der zweiten Spalte Zahlen zwischen 1 und 6 in aufsteigender Reihenfolge.


Meine Aufgabe ist es eine Abfrage zu jeder einzelnen Zeile der Importtabelle zu machen, dort die beiden Werte der ersten und zweiten Spalte einzulesen und in den Durchführungen die jeweilige Zahlenkombination mit einer Zählfunktion zu zählen!

Ich habe zu Beginn meines Codes die Zeilenanzahl der Importtabelle ermittelt, damit ich eine Laufvariable für die If-Abfrage habe.
Kann mir jemand bitte erklären, wie eine If-Abfrage über zwei Tabellenblätter hinweg funktioniert?

Viele Grüße und Danke im vorraus

SELECT count(*) as Anzahl
FROM Importtabelle
INNER JOIN Durchführungen ON Importtabelle.Spalte1=Durchführungen.Spalte1 AND Importtabelle.Spalte2=Durchführungen.Spalte2;

Sub DetermineEqualCombinationCount()
    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT count(*) as Anzahl FROM Importtabelle INNER JOIN Durchführungen ON Importtabelle.Spalte1=Durchführungen.Spalte1 AND Importtabelle.Spalte2=Durchführungen.Spalte2;")  
    rs.MoveFirst
    MsgBox rs.Fields("Anzahl").Value  
End Sub

Sub UpdateCounters()
    DoCmd.RunSQL "UPDATE Importtabelle INNER JOIN Durchführungen ON (cint(Importtabelle.Maincase) = Durchführungen.Testfall) AND (Importtabelle.Subcase = Durchführungen.Teilfall) SET Durchführungen.Zählung = Durchführungen.Zählung+1;"  
End Sub