Hallo,
ich bin gerade dabei ein kleines Verrechnungstool zu schreiben. Mein problem dabei ist, das Access beim Start in der Tabelle verrechnungstabelle prüfen soll, ob ein bestimmtes Datum überschritten ist, wenn ja dann soll dieses genullt werden.
Im Formular wäre das ja kein problem aber wie lasse ich das schon beim Access start prüfen damit auch meine Abfragen stimmen?
Ich hab mir das ungefähr so vorgestellt:
Sub autoexec()
If Verrechnungstabelle![Leasing End Date]
Hallo.
Sub autoexec()
Nicht als Sub, sondern ausnahmsweise in einem Makro „AutoExec“.
Darin rufst Du die Funktion auf, die das ausführt, was Du willst. Am einfachsten wäre hier wohl eine Aktualisierungsabfrage.
Public Function MachEtOtze()
Dim MyStatement As String
MyStatement="UPDATE Verrechnungstabelle SET [Leasing_net_rate]=Null WHERE [Leasing End Date]
Dankeschön! Das mit den Leerstellen werd ich beachten.
Eine Kleinigkeit noch…
Wenn kein Datensatz gefunden wird bekomm ich die Meldung
Run-time error ‚3061‘: Too few parameters. Expected 1. Wie bekomm ich das weg?
mit On Error goto 0 oder if err.Number = 3061 then Err.Clear klappts leider nicht.
Ist eigentlich nicht das erste mal das ich mit VBA arbeite aber irgendwie steh ich auf dem Schlauch.
Danke nochmal
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Ich habs selbst hinbekommen… Danke nochmals…
Ich hab einfach eine Sprungmarke eingesetzt.