Text in Spalten Datenausrichtung

379
Sean Hullah

Ich habe eine Reihe von Daten, zum Beispiel:

FOB0046WHT White business casual plain classic fit 20.8 41.7 1 2 24 24 24 0 20.8 1 0 12.2 0.584 24.3  FOB0083BLU Denim blue business casual plain extra slim fit 14.5 58.2 1 4 1 1 1 0 43.6 3 -29.1 6 0.413 24.2 0.416  FOB0184NPK Navy and pink business casual double face slim fit 16.6 16.6 1 1 0 0 0 0 0 0 16.6 5 0.303 5 0.303  FOB0186SKY Sky business casual non iron button down classic fit 90.3 90.3 4 4 19 4.8 19 0 0 0 90.3 49.4 0.548 49.4 0.548  FOB0186WHT White business casual non iron button down classic fit 83.4 83.4 3 3 6 2 6 0 0 0 83.4 73.5 0.882 73.5 0.882  FOB0188WHT White business casual non iron button down slim fit 104.2 164.6 5 8 33 6.6 33 0 60.4 3 43.7 53.2 0.51 80.5 0.489  FOB0209SKY Sky non iron extra slim fit business casual dobby grid shirt 60.4 102.1 3 5 24 8 24 0 41.7 2 18.8 33.6 0.556 57.4 0.562  FOB0046CHA Charcoal classic fit business casual shirt 145.8 187.5 7 9 20 2.9 20 0 41.7 2 104.2 83.5 0.573 107.4 0.573  FOB0046CHM Chambray denim classic fit business casual shirt 20.8 20.8 1 1 0 0 0 0 0 0 20.8 11.8 0.568 11.8 0.568  FOB0046IDG Indigo classic fit business casual shirt 20.8 20.8 1 1 0 0 0 0 0 0 20.8 11.8 0.566 11.8 0.566  FOB0083CHA Charcoal extra slim fit business casual shirt 20.8 20.8 1 1 0 0 0 0 0 0 20.8 12.5 0.601 12.5 0.601  FOB0083CHM Chambray denim extra slim fit business casual shirt 57.7 57.7 3 3 0 0 0 0 0 0 57.7 32.7 0.566 32.7 0.566  FOB0083IDG Indigo extra slim fit business casual shirt 104.2 104.2 5 5 21 4.2 21 0 0 0 104.2 62.3 0.598 62.3 0.598  FOB0112CHM Chambray denim slim fit business casual shirt 76.4 97.3 4 5 24 6 24 0 20.8 1 55.6 41 0.537 53 0.545  FOB0186LPK Light pink non iron classic fit bus cas button down shirt 62.5 62.5 3 3 20 6.7 20 0 0 0 62.5 32.9 0.527 32.9 0.527

Ich verwende Text in Spalten, aber da der Text aus einer anderen Anzahl von Wörtern besteht, werden die Zahlen nicht richtig ausgerichtet. Gibt es eine Möglichkeit, sie in die entsprechenden Spalten zurückzubringen?

0
Hinzufügen von Anführungszeichen "" um den Text? DavidPostill vor 7 Jahren 0
Sie benötigen eine Spalte mit dem Code auf der linken Seite, die zweite Spalte mit dem Text des Elements und dann alle Zahlen in ihren eigenen Spalten? Raystafarian vor 7 Jahren 0
Ja genau. Die Spaltenüberschriften lauten also Code / Description / # / # / # und so weiter. Da die Beschreibungen jedoch unterschiedliche Zeichen und Wortlängen haben, bin ich mir nicht sicher, was ich tun soll. Sean Hullah vor 7 Jahren 0
Das Problem beim Umsetzen des Textes ist, dass ich weit über 1000 Datenzeilen habe, und das würde zu lange dauern Sean Hullah vor 7 Jahren 0

3 Antworten auf die Frage

1
Gary's Student

Mit Daten wie diesen in Spalte A :

enter image description here

Dieses kurze Makro ausführen:

Sub ReFormatData() Dim N As Long, i As Long, st As String Dim j As Long N = 15  For i = 1 To N st = Cells(i, 1).Text ary = Split(st, " ") Cells(i, 2).Value = ary(0) For j = 2 To UBound(ary) If IsNumeric(ary(j)) Then Exit For Cells(i, 3).Value = Cells(i, 3).Value & " " & ary(j) Next j  L = 4 For k = j To UBound(ary) Cells(i, L).Value = ary(k) L = L + 1 Next k Next i End Sub

wird dies in den Spalten B und darüber hinaus produzieren:

enter image description here

Was ist, wenn sich im Textteil eine Zahl befindet? `UBZIFZIFF Mein zufälliger Text mit einer Nummer innerhalb von 20 12 13 43 1.23` würde eine andere Ausgabe erzeugen nixda vor 7 Jahren 0
@nixda ** Sie sind vollkommen korrekt! ** Der Code funktioniert nur, wenn die Daten den veröffentlichten Beispieldaten entsprechen. Eine Ausnahme muss von Hand behoben werden. Gary's Student vor 7 Jahren 0
@nixda Ja, das passiert ungefähr 500 Reihen weiter unten, wo ich "Black 3 packs" habe, auch wenn ich es benutze, es versäumt die erste Arbeit in jeder Reihe. Irgendwelche Ideen für eine Lösung? Ansonsten funktioniert das wunderbar !! Sean Hullah vor 7 Jahren 0
0

Wenn Sie keine VBA-Lösung mit einer großen Formel bevorzugen, versuchen Sie Folgendes:
=RIGHT(RIGHT(A2,LEN(A2)-FIND(" ",A2,1)),LEN(RIGHT(A2,LEN(A2)-FIND(" ",A2,1)))-MIN(SEARCH(,RIGHT(A2,LEN(A2)-FIND(" ",A2,1))&"0123456789"))+1)

Es wird die erste Stelle der Zahl nach dem ersten Leerzeichen (nach dem ersten Wort, das 46 FOB0046WHT enthält) gefunden. Das Ergebnis sind alle Zahlen in einer Zelle. Nach dem Kopieren des Ergebnisses und dem Einfügen von Spezial können Sie dann Text in Spalten verwenden Werte.

Dies ist eine großartige und einfache Lösung. Wie ich weiter oben bereits erwähnt habe, habe ich Beschreibungen mit Zahlen und dann verschlüsselt er alle Zahlen wieder aus der Ausrichtung. Was wäre dann der beste Weg, um die Beschreibungen und Codes herauszulösen? mit TTC? Irgendeine Art, die Zahlen von links zu sortieren, anstatt von rechts? Sean Hullah vor 7 Jahren 0
0
Máté Juhász

Hier ist eine Lösung mit regulären Ausdrücken. Um es zu verwenden, benötigen Sie das RegEx Find / Replace Add-In .

  • Formel für den Code:
    =RegExFind(A1,"[A-Z0-9]*")
  • Formel zur Beschreibung:
    =RegExReplace(A1,"[A-Z0-9]* (.*[a-z]) [0-9. ]*","$1")
  • Formel für die Zahlen:
    =RegExFind(SUBSTITUTE($A1,$B1&" "&$C1&" ",""),"[0-9.-]* ",COLUMN()-3)

Es funktioniert auch korrekt, wenn der Text Zahlen enthält, und behält alles bis zum letzten Buchstaben in der Beschreibung.

Verwandte Probleme