Hallo alle zusammen.
Ich habe folgendes Problem:
Ich habe ein Makro erstellt welches zuerst eine bestehende Tabelle leert und dann durch eine Abfrage an einer Vorhandenen Tabelle die zuvor gelehrte Tabelle mit aktuellen Daten füllt. Dieses klappt auch so weit. Nur wird beim Ausführen des Makros immer diese Fehlermeldung angezeigt, die mit ‚Ja‘ bestätigt werden muss:
XY kann nicht alle Datensätze anfügen, die von der Anfügabfrage betroffen sind.
XY hat 0 Felder wegen Typumwandlungsfehlern auf 0 eingestellt… etc.
Diese Meldung stellt für mich auch kein Problem da, da sie durch die Ausgeführte Abfrage ausgelöst wird. Sie soll einfach nur durch das Makro automatisch mit ‚Ja‘ bestätigt werden. Damit das Makro ohne Fremdeinwirkung zu Ende ausgeführt werden kann. Ist so etwas möglich? Ich habe mal mein Makro in VBA konvertiert. Damit nötige Anpassungen vorgenommen werden können.
**Option Compare Database
Option Explicit
'------------------------------------------------------------
’ Account_leeren
’
'------------------------------------------------------------
Function Account_leeren()
On Error GoTo Account_leeren_Err
DoCmd.OpenTable „Account“, acNormal, acEdit
DoCmd.RunCommand acCmdSelectAllRecords
DoCmd.RunCommand acCmdDelete
DoCmd.Close , „“
DoCmd.OpenQuery „eCRM Account Abfrage“, acNormal, acEdit
Account_leeren_Exit:
Exit Function
Account_leeren_Err:
MsgBox Error$
Resume Account_leeren_Exit
End Function**
Danke im Voraus