title image


Smiley Re: A00: Abbrechen einer Eingabe
Hallo ..,



am besten hinterlegts Du eine Prozedur beim Ereignis "Vor Aktualisierung". Hier fragst Du vor dem Speichern ab, ob die Änderung übernommen werden soll oder nicht.



Gruss Wolfgang



Beispiel:

Private Sub Form_BeforeUpdate(Cancel As Integer)

On Error GoTo ErrorHandler

Dim byteMsg01 As Byte



If Me.Dirty Then

byteMsg01 = MsgBox("Datensatz speichern?", vbYesNo + vbQuestion, " ")

If byteMsg01 = vbNo Then

Me.Undo

End If

End If



ErrorHandler:

If Err.Number 0 Then

MsgBox Err.Number & " " & Err.Description

End If

End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: