Vergleich zwischen Werten in Access 2007 über VBA
Hallo,
ich hab ein Problem mit einem VBA-Code in Access 2007.
ich hab in der Tabelle1 ein Feld1 und ein Formular mit einem Text-Feld (txt_Feld1) das beim klicken auf einen Button in die Tabelle geschrieben werden soll (aber nur, wenn die Werte unterschiedlich sind).
Ich habs über folgenden VBA-Code versucht. Das funktioniert auch soweit, sollang nicht entweder das Feld in der Tabelle leer ist und durchs Formuar gefüllt werden soll oder umgekert. Soll der Wert nur geändert werden, funktioniert der Code einwandfrei ("TestWert1" -> "TestWert2"). Das Script funktioniert also Solang nicht einer der beiden Werte NULL ist.
Hab ihr da eine Idee, an was das liegen kann? Hab ich da irgendwo einen Denkfehler drin?
Vielen dank für eure Unterstützung im Voraus.
mfg
andi
<edit>
Die Formularfelder und das Formular sind ungebunden.
</edit>
ich hab ein Problem mit einem VBA-Code in Access 2007.
ich hab in der Tabelle1 ein Feld1 und ein Formular mit einem Text-Feld (txt_Feld1) das beim klicken auf einen Button in die Tabelle geschrieben werden soll (aber nur, wenn die Werte unterschiedlich sind).
Ich habs über folgenden VBA-Code versucht. Das funktioniert auch soweit, sollang nicht entweder das Feld in der Tabelle leer ist und durchs Formuar gefüllt werden soll oder umgekert. Soll der Wert nur geändert werden, funktioniert der Code einwandfrei ("TestWert1" -> "TestWert2"). Das Script funktioniert also Solang nicht einer der beiden Werte NULL ist.
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT * FROM Tabelle1 WHERE [ID]= " & Me.txt_ID, dbOpenDynaset)
If rst.EOF Then
DoCmd.Close
MsgBox "Fehler", vbExclamation, "Fehler"
Else
rst.Edit
If Not Me.txt_Feld1 Is rst!Feld1 Then
rst!Feld1 = Me.txt_Feld1
End If
rst.Update
End If
rst.Close
Hab ihr da eine Idee, an was das liegen kann? Hab ich da irgendwo einen Denkfehler drin?
Vielen dank für eure Unterstützung im Voraus.
mfg
andi
<edit>
Die Formularfelder und das Formular sind ungebunden.
</edit>
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 102924
Url: https://administrator.de/contentid/102924
Ausgedruckt am: 24.11.2024 um 09:11 Uhr
3 Kommentare
Neuester Kommentar
Hallo,
dafür stellt VBA die Funktionen "Nz" und "IsNull" bereit.
Gruß - René
dafür stellt VBA die Funktionen "Nz" und "IsNull" bereit.
Gruß - René