Text in Spalten Automatisieren
#1
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.
Top
#2
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ß
Microsoft Excel Expert · Microsoft Most Valuable Professional (MVP) :: 2011-2019 & 2020-2022 :: 10 Awards
https://de.excel-translator.de/translator :: Online Excel-Formel-Übersetzer :: Funktionen :: Fehlerwerte :: Argumente :: Tabellenbezeichner
Top
#3
Super! Hat funktioniert  :18:
Top
#4
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
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste