Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Datensätz ändern
zurück: Anzeige von Dezimalstellen weiter: Automatisches ausfüllen nach Eingabe Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Derouf
Gast


Verfasst am:
16. Dez 2005, 09:58
Rufname:

Datensätz ändern - Datensätz ändern

Nach oben
       

Hallo,

ich möchte über ein Formular Datensätze einer verknüpften Tabelle ändern. Ein Datensatz wird in diversen Textfeldern und Kombinationsfeldern angezeigt. Ändert man nun einen Datensatz, soll man auf den "Speichern" Button klicken. Anschliessend wird eine MsgBox eingeblendet: "Datensatz wirklich speichern?" - Ja/Nein. Wird nun "Ja" angeklickt, soll der Datensatz gespeichert werden. Bei "Nein" soll die Änderung des Datensatzes rückgängig gemacht werden, sodass er wieder in seiner Ursprungsform im Formular angezeigt wird.
Wie lautet hierzu der VB Code? Ich habe schon einiges ausprobiert, aber so richtig funktioniert es nicht.

Noch eine Frage: Wenn ich dieses Formular öffne, wird im Detailfuss eine Standardschaltfläche angezeigt: "Datensatz: "erster Datensatz" "vorheriger" "nächster" "letzter". Wie kann ich diese Schaltfläche entfernen?
frca0013
Access - Einsteiger


Verfasst am:
16. Dez 2005, 10:29
Rufname:
Wohnort: Heuchelheim - Klingen


AW: Datensätz ändern - AW: Datensätz ändern

Nach oben
       

Moin!

Vielleicht hilft dir das weiter:
Code:
Private Sub cmd_speichern_Click()
On Error GoTo Err_cmd_speichern_Click
    Dim Mldg, Stil, Titel, Antwort
   
    Mldg = "Wollen Sie die Änderungen speichern?"
    Stil = vbYesNoCancel + vbQuestion
    Titel = "Speichern???"
    Antwort = MsgBox(Mldg, Stil, Titel)
    If Antwort = vbYes Then
        ' Änderungen speichern
        DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
        DoCmd.Close
      ElseIf Antwort = vbNo Then
        'Änderungen rückgängig
        DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
        DoCmd.Close
'      ElseIf Antwort = vbCancel Then
'        Exit Sub
    End If
Exit_cmd_speichern_Click:
    Exit Sub
Err_cmd_speichern_Click:
    MsgBox Err.Description
    Resume Exit_cmd_speichern_Click
End Sub
In deinen Formulareigenschaften musst du im Register Format die Navigationsaschltflächen auf Nein stellen --> dann werden sie nicht angezeigt!!!

Gruss
Carsten
Derouf
Gast


Verfasst am:
16. Dez 2005, 11:32
Rufname:

AW: Datensätz ändern - AW: Datensätz ändern

Nach oben
       

Ja, vielen Dank. Hat funktioniert.
Gast



Verfasst am:
14. Mai 2007, 23:25
Rufname:

AW: Datensätz ändern - AW: Datensätz ändern

Nach oben
       Version: Office 2003

Hallo zusammen!

Ich habe zum oben angegebenen Code noch eine Frage:
Wenn ich keine Änderungen gemacht habe, und dann bei der MsgBox auf "Nein" klicke, kommt die Fehlermeldung
Zitat:
Der Befehl oder die Aktion Rückgängig ist zurzeit nicht verfügbar
Kann man diese Meldung irgendwie vorher abfangen, sodass das Formular dennoch geschlossen wird?

Gruss und Danke!
Marcel
Willi Wipp
Moderator


Verfasst am:
14. Mai 2007, 23:32
Rufname:
Wohnort: Raum Wiesbaden

Re: Datensätz ändern - Re: Datensätz ändern

Nach oben
       Version: Office 2003

Hi Gast,

pruefe mal gleich am Anfang ob wirklich Daten zum Speichern vorhanden sind.
Code:
Private Sub cmd_speichern_Click()
On Error GoTo Err_cmd_speichern_Click
    Dim Mldg, Stil, Titel, Antwort
   
    If Not Me.Dirty Then Exit Sub
    '...

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Gast



Verfasst am:
15. Mai 2007, 00:26
Rufname:


AW: Datensätz ändern - AW: Datensätz ändern

Nach oben
       

Funkz!

Merci!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Wert per Abfrage ändern 3 Crunker 686 22. Okt 2007, 16:40
Pino Wert per Abfrage ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Mit Kontrollkästchen die Farbe eines Feldes ändern 8 MarcoX 997 24. Sep 2007, 20:35
MarcoX Mit Kontrollkästchen die Farbe eines Feldes ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellenname nachträglich ändern 3 Aquerias 2119 06. Sep 2007, 20:16
jens05 Tabellenname nachträglich ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Feldeigenschaften per SQL ändern? 1 Aquerias 1487 06. Sep 2007, 15:13
Nouba Feldeigenschaften per SQL ändern?
Keine neuen Beiträge Access Tabellen & Abfragen: Id Wert nachträglich nochmals ändern 13 arcos00 1109 27. Jun 2007, 11:57
Nouba Id Wert nachträglich nochmals ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Autowert ändern 0 derhoeppi 816 21. Nov 2006, 13:30
derhoeppi Autowert ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Datumsformat ändern in mmm jjjj (januar 2006) 2 Gast 2700 23. Aug 2006, 09:17
Gast Datumsformat ändern in mmm jjjj (januar 2006)
Keine neuen Beiträge Access Tabellen & Abfragen: benutze Tabellen in Abfrage ändern? 15 MBarthel 1399 04. Aug 2006, 13:30
MBarthel benutze Tabellen in Abfrage ändern?
Keine neuen Beiträge Access Tabellen & Abfragen: Duplikat-Abgleich in Kunden-DB; Bei Dublette: Status ändern 0 deadlink 1012 30. März 2006, 22:13
deadlink Duplikat-Abgleich in Kunden-DB; Bei Dublette: Status ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Daten über eine Schleife im gefilterten Formular ändern 1 Alwin 708 21. März 2006, 09:28
mapet Daten über eine Schleife im gefilterten Formular ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Feldname ändern? 9 Chriz1985 5470 30. Jan 2006, 08:23
Chriz1985 Feldname ändern?
Keine neuen Beiträge Access Tabellen & Abfragen: Mit einem Formular Kriterien ändern ? 1 MatthiasDD 704 13. Jan 2006, 12:28
jens05 Mit einem Formular Kriterien ändern ?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe