Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl
zurück: Abfrage: Spaltenkombinationen weiter: Datum per Shortcut in RTF-Memofeld einfügen 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
csnb
ich stolpere mich so durch...


Verfasst am:
22. Apr 2014, 09:44
Rufname:

Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl - Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl

Nach oben
       Version: Office 2010

Hallo zusammen,

die Suche hat mir zu diesem Thema wirklich einiges an Hinweisen geliefert, aber ich bekomme es trotzdem ums verr... nicht hin. Ich bekomme die Fehlermeldung:
Zitat:
Laufzeitfehler 3061, 1 Parameter zu wenig übergeben
Mein Ziel: es soll ein Datum in einer Liste von Sendungen aktualisiert werden. Vorher ist das fragliche Feld leer.

Mein bisheriger Weg:
Ich habe
- ein Listenfeld namens lstVorlauf mit Mehrfachauswahl, das auf einer Abfrage namens VorlaufSdg beruht. Die Abfrage zieht Daten aus der Tabelle ITRMaster. In dieser Tabelle gibt es das Feld Referenz, welches eine Sendung eindeutig identifiziert.
- ein Textfeld namens txtPick in dem das zu aktualisierende Datum eingetragen wird.

Aus diversen Forenbeiträgen habe ich mir diesen Code gebastelt und im Klickevent des Button PickDatSetzen hinterlegt:
Code:
Private Sub PickDatSetzen_Click()
    Dim varItm As Variant
   
    For Each varItm In Me!lstVorlauf.ItemsSelected
        CurrentDb.Execute _
           "UPDATE ITRMaster" _
           & " SET actual_pick_up_date = 'txtPick.value'" _
         & " WHERE Referenz ='" & Me!lstVorlauf.ItemData(varItm) & "'"
    Next varItm
    Me!lstVorlauf.Requery
End Sub
Wo liegt mein Fehler und warum?
Vorab schon einmal vielen Dank!

Gruß
Carsten
Marmeladenglas
komme zurecht


Verfasst am:
22. Apr 2014, 09:49
Rufname:


AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl - AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl

Nach oben
       Version: Office 2010

txtPick ist offensichtlich eine Formularreferenz. Insofern muss das außerhalb des SQL-Strings referenziert werden. Beim Listenfeld machst es "komischerweise" richtig.
Des Weiteren baut man ein Datum über ein spezielles Format in den SQL-String ein.
Code:
           & " SET actual_pick_up_date = " & Format(Me.txtPick _
                                                  , "\#mm-dd-yyyy\#") _
{" ergaenzt by Willi Wipp}
csnb
ich stolpere mich so durch...


Verfasst am:
22. Apr 2014, 10:02
Rufname:

AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl - AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl

Nach oben
       Version: Office 2010

Hallo Marmeladenglas,

Das ging überraschend schnell. Du hast vollkommen recht. txtPick ist eine Formularreferenz im Formular Transportmaster. Es soll soll das Datumsformat dd-mm-yyyy genutzt werden.
Mein neuer Code sieht nun so aus, liefert aber leider das Ergebnis Syntaxfehler. Irgendwo habe ich in der neuen Codezeile offenbar einen Fehler eingebaut.
Code:
Private Sub PickDatSetzen_Click()
    Dim varItm As Variant
   
    For Each varItm In Me!lstVorlauf.ItemsSelected
        CurrentDb.Execute _
           "UPDATE ITRMaster" _
           & " SET actual_pick_up_date = " & Format(Me.txtPick _
                                                  , "\#mm-dd-yyyy\#)_
         & " WHERE Projekt ='" & Me!lstVorlauf.ItemData(varItm) & "'"
    Next varItm
    Me!lstVorlauf.Requery
End Sub
Kannst Du mir noch einmal helfen?
Marmeladenglas
komme zurecht


Verfasst am:
22. Apr 2014, 10:03
Rufname:

AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl - AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl

Nach oben
       Version: Office 2010

Hi,
mein Fehler Gänsefüßchen nach dem zweiten #
csnb
ich stolpere mich so durch...


Verfasst am:
22. Apr 2014, 10:08
Rufname:


AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl - AW: Aktualisierungsabfrage in Listenfeld mit Mehrfachauswahl

Nach oben
       Version: Office 2010

Hallo Marmeladenglas,

ich werde bekloppt, es funktioniert. Der endgültige Code sieht nun so aus:
Code:
Private Sub PickDatSetzen_Click()
    Dim varItm As Variant
   
    For Each varItm In Me.lstVorlauf.ItemsSelected
        CurrentDb.Execute _
           "UPDATE ITRMaster" _
           & " SET actual_pick_up_date = " & Format(Me.txtPick _
                                                  , "\#mm-dd-yyyy\#") _
         & " WHERE Referenz ='" & Me.lstVorlauf.ItemData(varItm) & "'" _
                        , 128 'dbFailOnError
    Next varItm
    Me.lstVorlauf.Requery
End Sub
Vielen lieben Dank!
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: Anfügabfrage/Listenfeld 6 Patrick_gast 384 21. Dez 2009, 09:54
Patrick_Gast Anfügabfrage/Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Listenfeld mit Mehrfachauswahl 13 Gast091109 686 10. Nov 2009, 16:41
Gast091109 Listenfeld mit Mehrfachauswahl
Keine neuen Beiträge Access Tabellen & Abfragen: Gefiltertes Listenfeld in Tabelle speichern 11 Mr. Deeds 1585 05. Sep 2009, 15:12
Marmeladenglas Gefiltertes Listenfeld in Tabelle speichern
Keine neuen Beiträge Access Tabellen & Abfragen: Mehrfachauswahl Kontrollkästchen in Abfrage übernehmen 3 Gastjens 776 04. Aug 2009, 15:02
Gastjens Mehrfachauswahl Kontrollkästchen in Abfrage übernehmen
Keine neuen Beiträge Access Tabellen & Abfragen: Listenfeld Datenquelle SQL Query mit Wert aus Textfeld 4 myvantage 1390 27. Mai 2009, 21:39
myvantage Listenfeld Datenquelle SQL Query mit Wert aus Textfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Zeitraum per Listenfeld abfragen 4 bobby-k 482 07. Apr 2009, 17:56
Willi Wipp Zeitraum per Listenfeld abfragen
Keine neuen Beiträge Access Tabellen & Abfragen: Report: Übergabe eines Wertes aus Textfeld in Listenfeld 2 hekabe 475 05. Feb 2009, 16:58
hekabe Report: Übergabe eines Wertes aus Textfeld in Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: In einem Listenfeld nur bestimmte werte anzeigen 14 gisiangel 2924 01. Nov 2008, 15:38
osaft27 In einem Listenfeld nur bestimmte werte anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Summe von den Optionen im Listenfeld 4 Disastro 490 22. Jan 2008, 08:08
jens05 Summe von den Optionen im Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Aktualisierungsabfrage bei Mehrfachauswahl in Listenfeld 5 Betullam 784 04. Jan 2008, 22:25
Betullam Aktualisierungsabfrage bei Mehrfachauswahl in Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage starten vom Listenfeld 3 JoSCh1 780 19. Okt 2007, 14:22
Willi Wipp Abfrage starten vom Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Filter im Listenfeld aus Abfrage 1 hansemann2510 686 23. Aug 2007, 21:22
hansemann2510 Filter im Listenfeld aus Abfrage
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks