Thema Datum  Von Nutzer Rating
Antwort
Rot Textbox value in Tabelle hinzufügen VBA Acess
 12.07.2021 12:49:28 Linn
NotSolved
20.07.2021 12:46:42 Gast868
NotSolved

Ansicht des Beitrags:
Von:
Linn		 Datum:
12.07.2021 12:49:28		 Views:
841		 Rating:
     
Antwort:
  Ja
Thema:
Textbox value in Tabelle hinzufügen VBA Acess

Hallo zusammen,

ich bin sehr neu zu VBA. Ich pflege eine Datenbank, die aus verschiedenen Tabellen sowie Formularen bestehen. Unter diesem sind tblPackmittel, tblBeschaffung (hier werden alle einzelnen Beschaffungen jedes Packmittels aufgenommen), frmPackmittel (das den Textbox txtPMKosten enthält) und frmBeschaffung (das den Textbox txtAVGKosten enthält, die die Durchschnittkosten jedes Packmittels basierend auf der Beschaffungen ausgibt).

Ich habe eine neue Spalte "PMKosten" in der tblPackmittel erstellt. Jetzt möchte ich den Wert vom txtAVGKosten im frm_Beschaffung in diese Tabelle hinzufügen und ihn im frmPackmittel anzuzeigen. Mein Code in frm_Beschaffung lautet so:

If (txtAVGPackmittelkosten <> 0) Then

        Set db = CurrentDb()

        Set GetInfo = db.OpenRecordset("tblPackmittel", dbOpenDynaset)

        db.Execute "UPDATE tblPackmittel SET tblPackmittel.PMKosten = """ & Me.txtAVGPackmittelkosten.Value & """ WHERE tblPackmittel.Packmittelnummer = " & Forms![Form_frmPackmittel]![Packmittelnummer] & ""

End If

Leider hat es nicht funktioniert. Die Spalte "PMKosten" in meiner tblPackmittel wird nicht aktualisiert. Ich weiß nicht wo der Fehler ist. Könnte jemand mir bitte helfen? Ich bedanke mich sehr!!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Textbox value in Tabelle hinzufügen VBA Acess
 12.07.2021 12:49:28 Linn
NotSolved
20.07.2021 12:46:42 Gast868
NotSolved