Office: Mehrere Abfragen, auch Aktionsabfragen, ausführen ohne anzei

Hallo,

ich möchte per Buttonclick mehrere Abfragen starten ohne Sie mir anzeigen zulassen.

Dazu habe ich folgenden Code geschrieben:

Private Sub Befehl22_Click()
With CurrentDb()
.Execute "Abfrage1, dbFailOnError"
.Execute "Abfrage2, dbFailOnError"
....
End With
End Sub

Dies hat nicht ganz funktioniert. Ich erhalte folgende Fehlermeldung: Die Eingangstabelle der Abfrage kann nicht gefunden werden!!!
Das ist aber sicher nicht der Fehler, weil alle Abfragen funktionieren.

Ich glaube viel mehr dass an dem Code was falsch ist


Gruß lagenie

 

Hallo,
da ist was mit den Anführungszeichen durcheinandergekommen ;)

Code:

Private Sub Befehl22_Click()
    With CurrentDb()
      .Execute "Abfrage1", 128 'dbFailOnError
      .Execute "Abfrage2", 128 'dbFailOnError
      '....
    End With
End Sub