Hi!
Ich muss jeden Tag hunderte von Containernummern miteinander vergleichen. Leider schafft es unser amerikanischer Partner nicht, Leerzeichen zwischen Scag und Nummer wegzulassen und deshalb kann ich es nicht einfach der europäischen Liste gegenüberstellen.
Das schaut etwa so aus HLXU 6344523 gegen HLXU6344523
Gibt es eine einfache Lösung wie ich die Leerzeichen wegmachen kann. Händisch ist bei hunderten Dateien viel zu aufwendig.
Für eine Hilfe im voraus dankbar grüßt
Dusan
Hallo Dusan,
wenn die Werte alle in einer Tabelle sind, ist es einfach. Strg + H für Suchen und Ersetzen. Bei Suchen gibst Du ein Leerzeichen ein, bei Ersetzen nichts. Und dann auf Alle ersetzen klicken. Sollten die Infos nur in bestimmten Spalten sein, dann vorher die betreffenden Spalten markieren.
Wenn Du aber hunderte Dateien hast, kann ich leider auch nicht helfen.
Gruß
Anka
Hallo Anka!
Danke für den super Tip. Ein Leerzeichen hab ich damit weggebracht, das zweite erkennt Excel leider nicht als solches.
Grüße
Dusan
Holla.
Gibt es eine einfache Lösung wie ich die Leerzeichen wegmachen
kann. Händisch ist bei hunderten Dateien viel zu aufwendig.
Max’n Makro, was Du auf eine Tastenkombination legst.
Option Explicit
Sub BlankWeg()
'
' BlankWeg Makro
' entfernt Blanks aus Text
'
' Tastenkombination: Strg+b
'
Cells.Select
Selection.Replace What:=" ", Replacement:="", LookAt:=xlPart, \_
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, \_
ReplaceFormat:=False
End Sub
Das macht natürlich alle Blanks weg. Wenn das nur in bestimmten Zellen oder peng erfolgen soll, müsstest Du den Cells.Select entsprechend anpassen.
Dann musst Du in Deiner Datei nur noch {STRG b} drücken, und fertig ist die Laube.
Gruß Eillicht zu Vensre
Holla.
Danke für den super Tip. Ein Leerzeichen hab ich damit
weggebracht, das zweite erkennt Excel leider nicht als
solches.
Wenn z.B. „HUCH 123456“ in der Zelle steht, dann lass Dir mal =CODE(TEIL(A1;5;1)) anzeigen. Das liefert den ASCII-Code (vermutlich 160) für Dein Blanknichtblank.
Gruß Eillicht zu Vensre
Wenn z.B. „HUCH 123456“ in der Zelle steht, dann lass Dir mal
=CODE(TEIL(A1;5;1)) anzeigen. Das liefert den ASCII-Code
(vermutlich 160) für Dein Blanknichtblank.
Hallo Eillicht!
Danke erstmal für deine Hilfe, ich bin ganz sprachlos!
Stimmt, 160 steht da, nur hab ich leider keine Ahnung was das für mich jetzt bedeutet. Ich hab auch noch nie mit Makros zu tun gehabt, könntest du mir kurz erklären wie ich das einfüge?
Grüße
Dusan
Holla.
Nimm einfach dieses Makro
Option Explicit
Sub BlankWeg()
'
' BlankWeg Makro
' Entfernt Blanks aus Text
'
' Tastenkombination: Strg+b
'
Cells.Select
Selection.Replace What:=" ", Replacement:="", LookAt:=xlPart, \_
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, \_
ReplaceFormat:=False
Selection.Replace What:=" ", Replacement:="", LookAt:=xlPart, \_
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, \_
ReplaceFormat:=False
End Sub
Du siehst, dass optisch kein Unterschied zwischen dem normalen Leerzeichen (ASCII 32) und dem „Dauerleerzeichen“ (ASCII 160) besteht. In eine Zeichenkette gibt man es ein, indem man bei gedrückter ALT-Taste auf dem numerischen Tastenblock 0160 drückt.
Gruß Eillicht zu Vensre
Hi!
Danke dir vielmals und ein dreifaches Hallelujagobble!Hallelujagobble!Hallelujagobble!
Grüße
Dusan