Leerzeichen in Zelle einfügen

[stonemaus]

Hallo meine Geschätzten Excel Helfer

Ich habe in Bereich C22 bis C1000 12 stellige Zahlen-Buchstabenreihen.

Beispiel „374B9021L5F5“ nun möchte ich einige Leerzeichen mittels VBA einfügen.

So sollte es danach aussehen „374 B 9021 L5 F5“. 

Meine zweite Frage, wie kann ich diese Spalten nach den zwei Buchstaben „L5“ mit einen Auswahlfeld sortieren.

Bitte um Eure Hilfe, und schon mal vielen Dank im voraus


Gruß Peter

[RPP63]

Moin Peter!
Teste mal:

Sub Leerzeichen()
Dim i&
Application.ScreenUpdating = False
For i = 22 To 1000
  Cells(i, 3) = Format(Cells(i, 3), "@@@ @ @@@@ @@ @@")
Next
End Sub

Gruß Ralf

---

Meine zweite Frage, wie kann ich diese Spalten nach den zwei Buchstaben „L5“ mit einen Auswahlfeld sortieren.

Ich sehe den Letter L und die Ziffer 5 …
Egal:
Sortiere die Hilfsspalte mit der Formel
=TEIL(C22;12;2)

[stonemaus]

Hallo Ralf

Vielen Dank, das funktioniert perfekt.

Gruß Peter

---

Hallo, ich habe die Frage schlecht formuliert.

Es gibt in der Buchstaben-Zahlenreichen L1 bis L9, nun möchte ich über ein Auswahlfeld filtern.

[RPP63]

Du kannst im Suchfeld des Autofilters nach *L5* suchen (Asteriske beachten!).
Programmatisch per VBA geht das ähnlich:

Code:

Criteria1:="*" & DeinDropdown.Text & "*"

[stonemaus]

Hallo,

Vielen Dank hab es hingekriegt.

Gruß Peter