Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > Text in Spalten Automatisieren
Normale Version: Text in Spalten Automatisieren
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

FNV

30.07.2019, 11:25
Hallo zusammen, 

mein Unternehmen nutzt derzeit noch kein ERP System, weshalb wir versuchen viele Funktionalitäten mit Excel abzudecken (natürlich nur bedingt erfolgreich). 

Die aktuellste Herausforderung der ich zur Zeit gegenüber stehe, ist die automatische Trennung eines Textes in Spalten. 
Wir haben Kisten in unsrem Lager die wir abscannen wollen (z.B. Inventur etc.). 
Bei abscannen erhalten wir folgenden Text: Artikelbezeichnung;Artikel ID;Lieferant;Lieferanten Artikelnummer

Jetzt wollte ich wissen, ob es eine Möglichkeit gibt den Vorgang "Text in Spalten" so zu automatisieren, dass beim einscannen eines neuen Codes direkt in Spalten getrennt wird. 
In der Praxis also: Ich gehe zum Lager und scanne eine Kiste ab. Der zusammenhängende Text erscheint in A2 und wird direkt in Spalten getrennt (dann wird zum Beispiel der aktuelle Lagerbestand eingetragen). Der nächste gescannte Code soll in A3 erscheinen und wieder direkt aufgeteilt werden usw. 


Alle versuche das Makro händisch zu erstellen und auch alle Google-Suchen zu diesem Thema waren leider erfolglos. 

Vielen Dank schon Mal für eure Bemühungen.

maninweb

30.07.2019, 11:50
Hallo,

das ginge möglicherweise auch mit Formeln.


Code:
A2=Artikelbezeichnung;Artikel ID;Lieferant;Lieferanten Artikelnummer
B2=LINKS(WECHSELN($A$2&";";";";"$$$";1);FINDEN("$$$";WECHSELN($A$2&";";";";"$$$";1))-1)
C2=WECHSELN(LINKS(WECHSELN($A$2&";";";";"$$$";2);FINDEN("$$$";WECHSELN($A$2&";";";";"$$$";2))-1);B2&";";"")
D2=WECHSELN(LINKS(WECHSELN($A$2&";";";";"$$$";3);FINDEN("$$$";WECHSELN($A$2&";";";";"$$$";3))-1);B2&";"&C2&";";"")
E2=WECHSELN(LINKS(WECHSELN($A$2&";";";";"$$$";4);FINDEN("$$$";WECHSELN($A$2&";";";";"$$$";4))-1);B2&";"&C2&";"&D2&";";"")
Gruß

FNV

30.07.2019, 16:14
Super! Hat funktioniert  :18:

echo

30.07.2019, 16:31
Hallo
oder etwas kürzer
A2 wie vor dem String, getrennt durch ;
für B2 zum kopieren nach rechts
=GLÄTTEN(TEIL(WECHSELN($A2;";";WIEDERHOLEN(" ";999));SPALTE(A2)*999-998;999))

Siehe (ganz unten) : http://www.herber.de/excelformeln und bitte suchen .../formeln.html?welcher=210

Gruß Holger
Clever-Excel-Forum > Office-Anwendungen > Excel > Text in Spalten Automatisieren