Office: (Office 2010) Mehrere Werte einer Zelle trennen

Hi zusammen,

habe über die Suche leider nix passendes Gefunden, deshalb hier mal die Schilderung meines Problems:

ich habe als Datenquelle eine txt-Datei welche Semikolon getrennt ist. Diese habe ich als verknüpfte Tabelle in Access eingehängt. mit einer Anfügeabfrage befülle ich mir nun meine Access-Tabelle aus der txt, mit den Spalten die ich im folgenden verwenden möchte.
Nun habe ich mehrere Spalten, in welchen in der txt mehrere Werte stehen, getrennt durch ein Leerzeichen.
z.B. so:
Code:

die Länge der Zahlen ist 3-5 Stellen, jedoch willkürlich, die Anzahl der Zahlen unterschiedlich; max. jedoch 10.

Ich möchte nun beim Import aus diesem Feld 10 neue Felder erzeugen, im Zweifel bleiben die letzten X Felder leer, sofern nicht genug Werte vorhanden sind.

Bisher habe ich nur "geschafft" den ersten Wert zu extrhieren, mit einem einfachen
Code:

wie mache ich es, dass ich das 2., 3., n-te Leerzeichen finde und bis zum jeweils nächsten LZ meinen String extrahiere?

Sofern die Lösung im Bereich VBA liegt, wäre ich gleich über eine Erklärung Dankbar, wie ich VBA mit meiner Anfügeabfrage verkaspere ;-)

Vielen Dank für Eure Hilfe!

Jonas

:)

 

Die Trennung kann man mit der Funktion Split erledigen, die orientiert sich an den Trennern. Zur Verwendung: In einer Abfrage kann Split nicht direkt verwendet werden, sondern da muss sie in eine Anwenungsfunktion eingepackt werden, siehe z.B. bestimmten Text zwischen zwei / raus extrahieren

Damit baust Du Dir sehr wahrscheinlich einen Datenmodellfehler auf: Gleiche Informationen gehören in ein Feld, also sollten da bis zu zehn Datensätze entstehen.

 

Hallo Eberhard,

das ist in einem nächsten Step das Ziel. Vielleicht beschreibe ich die Anwandung ein Bisschen genauer. Ich übertrage mein Fall mal auf Adressen:

Ich habe eine Tabelle (meine Quell-txt) mit Name, Hausnummer, Nachbarhausnummern (Plural)

Müller, 9, 7 11 13 15 17
Maier, 11, 7 9 13 15

Ziel beim Einlesen ist eine Tabelle "Adressen" (Name, Hausnummer) und eine zweite tabelle "nachbarn" in welcher dann steht:

Müller, 7, Schmidt
Müller, 11, Maier
...
Müller, 17, Schulz
Maier, 9 , Müller
Maier, 13, Irgendwer
...

Ich hoffe a) dass das so korrekt ist, b) es nachvollziehbar ist.
Bleibt also das Problem, die Nachbarhausnummern welche in einem Feld stehen zu trennen.

Jonas

 

Hallo Jonas,
um aus einem Datensatz mehrere zu erzeugen, sehe ich eigentlich nur eine VBA-Prozedur als Möglichkeit.
Der Ablauf sähe bspw. so aus:
- öffnen Recordset rs_IN auf Basis der eingebundenen Text-Datei
- öffnen rs_OUT auf Basis der Zieltabelle
- Verarbeitungsschleife über rs_IN (While Not rs_IN.EOF)
- innere Verarbeitungsschleife über die zu splittenden Felder (hier hilft die Split-Funktion inkl. LBound und UBound zur Bestimmung der Array-Dimension = Laufweite)
- schreiben in Zieltabelle in der inneren Verarbeitungsschleife
- wiederholen für jedes dafür infrage kommende Eingabefeld

Wenn die einzelnen Teil-Strings sich zu einem Datensatz ergänzen sollen, ist der Ablauf ein klein wenig anders:
- alle Felder in Arrays aufsplitten und Schleife laufen lassen, wobei UBound hoffentlich bei allen Arrays übereinstimmt, sonst wird's halt ein wenig komplizierter (bzw. aufwändiger)

Ich hoffe, das hilft dir weiter.