collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 83
  • Punkt Versteckte: 0
  • Punkt Mitglieder: 0

Es sind keine Mitglieder online.

* Forenstatistik

  • stats Mitglieder insgesamt: 14419
  • stats Beiträge insgesamt: 71647
  • stats Themen insgesamt: 9667
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: Zeilen einer Abfrage in ein einziges Feld mit Kommatrennung zusammenfassen  (Gelesen 184 mal)

Offline a0554

  • Newbie
  • Beiträge: 3
Hallo zusammen,
ich suche mir jetzt schon seit Stunden einen Wolf...

Ich habe ein Endlosformular mit sämtlichen deutschen Postleitzahlen auf dem über eine Checkbox ausgewählt wird, ob ein Anbebot in der PLZ angeboten werden soll.

Also:
Postleitzahlengebiet      Angebot_ja#
72336                                 x
72458
72459                                 x
...

In einer Abfrage Filter ich auf den Wert „ja“ der Checkbox. Somit werden mir nur die in Frage kommenden PLZ angezeigt.

Also:
72336
72459
...

Nun muss ich die mit „ja“ gewählten Postleitzahlen in eine Excel überführen. Hier ist das Problem, dass alle Postleitzahlen in ein Feld mit „Komma getrennt“ exportiert werden müssen.

also: 72336, 72459, ...

Wie bekomme ich es jetzt hin, dass die gefilterten Postleitzahlen die in der Abfrage untereinander stehen ALLE in einem Feld mit einer „Kommatrennung“ stehen?

Für eure Hilfe und Mühe schon vielen Dank
im Voraus!

 

Offline PhilS

  • Global Moderator
  • Access-Meister
  • *****
  • Beiträge: 594
    • Tipps zu Access, VBA, SQL und Co.
Ich habe mal einen Text veröffentlich, der zeigt, wie du Daten eines Feldes als kommagetrennte Liste ausgeben kannst.

Ansonsten gibt es noch das häufig genannte Beispiel SQLListe.
 

Offline martin1991

  • Newbie
  • Beiträge: 13
alternativ ein kurzes Script das nicht alle Eventualitäten abdeckt.
Code: Visual Basic
Sub StringAusAbfrage()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim str As String
    Set db = CurrentDb()
    Set rs = db.OpenRecordset("qryDeineAbfrage", dbOpenDynaset)

   Do While Not rs.EOF
        str = str & rs!DeineSpaltenbezeichnung & ","
        rs.MoveNext
    Loop
    Debug.Print str
End Sub

 
 

Offline a0554

  • Newbie
  • Beiträge: 3
VIELEN DANK für eure Hilfe!
 

 

wieviel Zeilen VBA-Code pro DB

Begonnen von MonsterbieneBoard Access Programmierung

Antworten: 8
Aufrufe: 6376
Letzter Beitrag Juli 29, 2010, 21:33:07
von Hondo
Mehrer Daten aus Zeilen in Spalten aufteilen.

Begonnen von CarStuBoard Access Programmierung

Antworten: 4
Aufrufe: 3714
Letzter Beitrag Juli 07, 2010, 12:51:08
von oma
Spalten und Zeilen im Kreuz

Begonnen von polluxmediusBoard Tabelle/Abfrage

Antworten: 5
Aufrufe: 3745
Letzter Beitrag Juli 13, 2010, 15:38:51
von bahasu
Bericht drucken -> Zeilen fehlen beim Seitenumbruch

Begonnen von pjo12345Board Bericht

Antworten: 8
Aufrufe: 9026
Letzter Beitrag Oktober 10, 2010, 10:09:03
von DF6GL
bestimmte Zeilen miteinander kombinieren

Begonnen von dave_christopherBoard Tabelle/Abfrage

Antworten: 12
Aufrufe: 7570
Letzter Beitrag Januar 19, 2011, 10:21:29
von database

Advertisment / Werbung - Amazon Affiliate Links