Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access Abfrage Ausgabe einer Spalte in Zeile

Frage Microsoft Microsoft Office

Mitglied: napperman

napperman (Level 2) - Jetzt verbinden

14.01.2011, aktualisiert 09:26 Uhr, 9417 Aufrufe, 2 Kommentare

Moin zusammen!

Mein Problem ist in der Überschrift schwer zu beschreiben. Deshalb hier der Langtext

Ich habe eine Abrage die folgendes Ergebnis liefert


Kontaktnummer | Kontakgruppe | email

0049 | VW | 1@1.de
0049 | Skoda | 1@1.de
0049 | Audi | 1@1.de
0049 | Autohaus | 1@1.de



Hinter der Nummer verbirgt sich eine Adresse, die 2 Spalte ist eine Zuordnung
Nun möchte ich nicht jede Adresse mehrmals angezeigt bekommen, sondern nach dem Muster

0049 VW, Skoda, Audi, Autohaus

wobei es mir relativ egal ist, ob die Kontakgruppe in einer Spalte mit Komma getrennt oder in weiteren Spalten steht.

Es wird nie mehr als 10 Zuordnungen geben.
Kreuztabelle habe ich schon probiert, da bekomme ich aber nur eine 1 rein wenn zuordnung besteht.

Ich brauche aber zwingend die Daten in Textform.
Hintergrund:
Ich muss es in ein anderes Programm importieren.
Dieses nimmt aber das Feld email als Erkennungsfeld, ob der Datensatz bereits besteht. Ich kann den also nicht mehrfach
anlegen, sondern muss die Kontaktgruppe in ein Feld oder in mehrere Felder verteilt importieren.


Hat jemand ne Idee wie ich das in Access 2003 realisiere?

Gruß,
Napperman
Mitglied: thaenhusen
14.01.2011 um 10:45 Uhr
Moin.

Eine Kreuztabelle ist der Richtige Weg, Du musst Dir nur auch bei Null Werten Gedankenmachen.

So ungefähr: WENN(Kontakgruppe is null; 0; Kontakgruppe)

Dann müsstest Du das eigentlich hinbekommen.

HTH
MK
Bitte warten ..
Mitglied: napperman
17.01.2011 um 12:56 Uhr
Ich habe es mit einem Modul und einer Abfrage gelöst bekommen:

01.
Public Function Zeile(Kontaktgruppenoberbegriff As String, Kontaktnummer As String) As String 
02.
Dim strSQL As String 
03.
Dim rs As DAO.Recordset 
04.
 
05.
  strSQL = "SELECT Kontaktgruppenoberbegriff FROM Kontakte WHERE Kontaktnummer = '" & Kontaktnummer & "'" 
06.
  Set rs = DBEngine(0)(0).OpenRecordset(strSQL) 
07.
 
08.
  Do While rs.EOF = False 
09.
    Zeile = Zeile & ", " & rs!Kontaktgruppenoberbegriff 
10.
    rs.MoveNext 
11.
  Loop 
12.
 
13.
  Zeile = Mid(Zeile, 3) 
14.
 
15.
rs.Close 
16.
Set rs = Nothing 
17.
End Function
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Powershell - Ausgabe gruppieren - gleichzeitig Werte in anderer Spalte addieren (9)

Frage von Affkopf89 zum Thema Batch & Shell ...

Microsoft Office
gelöst Excel: Wenn Wert in Spalte A dann kopiere Zeile (8)

Frage von michi1983 zum Thema Microsoft Office ...

Datenbanken
gelöst SQL Abfrage - Ausgabe von Person mit Privat- und Dienstadresse (3)

Frage von CBruns zum Thema Datenbanken ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows 10
Windows 10 im Unternehmen? (26)

Frage von zorlayan zum Thema Windows 10 ...

Festplatten, SSD, Raid
Raid 1 2 SSD mit Windows Server 2016 (17)

Frage von jaywee zum Thema Festplatten, SSD, Raid ...

Netzwerkgrundlagen
Pro Contra "echtes Subnetting" VLSM (12)

Frage von killing.Apfelkuchen zum Thema Netzwerkgrundlagen ...

Voice over IP
Über Fritzfax over IP gehen nur einige Faxe (11)

Frage von shearer9 zum Thema Voice over IP ...