Kann man das über Format lösen oder VBA wie?!
Danke schonmal
Steffen
Kann man das über Format lösen oder VBA wie?!
Danke schonmal
Steffen
es geht bestimmt noch einfache, aber probier mal das hier:
Sub leerz()
Dim A As Integer
Dim B As String
For A = 1 To Len(Cells(1, 1))
B = B & Right(Left(Cells(1, 1), A), 1) & " "
Next A
Cells(2, 1) = B
End Sub
mfg
Christian
P.S.: Dieses Beispiel ist aus der englischen Excel-Version. Evtl. mußt Du "Left" und "Right" gegen "Links" und "Rechts" austauschen.
Function Zeichen_einf(Text As String, Zeichen As String) As String
Dim L%, Z$, T$
T = Text
For L = 1 To Len(T)
Z = Z & Right(Left(T, L), 1) & Zeichen
Next
Z = Left(Z, (Len(Z) - 1))
Zeichen_einf = Z
End Function
aber ich musste einen neuen Thread machen, weil ich nicht weis wie ich dieses Script anpassen kann!
Vielleicht könnt Ihr nochmal einen Blick drauf werfen
Danke
Steffen
Um Leerzeichen oder ein bestimmtes Zeichen, wie das "|" Zeichen, zwischen den Zeichen eines Textes in Excel einzufügen, kannst du VBA verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:
Öffne Excel und drücke ALT + F11
, um den VBA-Editor zu öffnen.
Klicke im Menü auf Einfügen und wähle Modul.
Füge den folgenden VBA-Code in das Modul ein:
Sub leerz()
Dim A As Integer
Dim B As String
For A = 1 To Len(Cells(1, 1))
B = B & Right(Left(Cells(1, 1), A), 1) & " "
Next A
Cells(2, 1) = B
End Sub
Schließe den VBA-Editor und gehe zurück zu Excel.
Gib in Zelle A1 den Text ein, den du bearbeiten möchtest.
Führe das Makro leerz
aus, um die Leerzeichen in Zelle A2 anzuzeigen.
Fehler: Der VBA-Code funktioniert nicht.
Left
und Right
durch Links
und Rechts
ersetzen, wenn du eine deutsche Version verwendest.Fehler: Die Leerzeichen erscheinen nicht.
Falls du kein VBA verwenden möchtest, kannst du auch die Funktion TEXTVERKETTEN (in neueren Excel-Versionen) oder VERKETTEN nutzen:
TEXTVERKETTEN:
=TEXTVERKETTEN(" "; WAHR; A1; B1; C1)
VERKETTEN:
=VERKETTEN(A1; " "; B1; " "; C1)
Diese Methoden sind nützlich, wenn du Leerzeichen zwischen spezifischen Zellen einfügen möchtest.
Beispiel 1: Wenn in Zelle A1 der Text "HalloWelt" steht und du Leerzeichen einfügen möchtest, kannst du das Makro ausführen, um "H a l l o W e l t" in Zelle A2 zu erhalten.
Beispiel 2: Um ein anderes Zeichen, wie "|" einzufügen, kannst du den VBA-Code wie folgt anpassen:
For A = 1 To Len(Cells(1, 1))
B = B & Right(Left(Cells(1, 1), A), 1) & "|"
Next A
Wenn du häufig Leerzeichen in Text einfügen musst, erstelle eine benutzerdefinierte Funktion (UDF) für mehr Flexibilität. Hier ist ein Beispiel:
Function Zeichen_einf(Text As String, Zeichen As String) As String
Dim L As Integer, Z As String
For L = 1 To Len(Text)
Z = Z & Mid(Text, L, 1) & Zeichen
Next L
Zeichen_einf = Left(Z, Len(Z) - Len(Zeichen))
End Function
Diese Funktion ermöglicht es dir, das Zeichen, das du einfügen möchtest, flexibel auszuwählen, was besonders nützlich ist, wenn du mit verschiedenen Daten arbeitest.
1. Wie kann ich Leerzeichen zwischen Text und Zahl in Excel einfügen?
Um Leerzeichen zwischen Text und Zahlen einzufügen, kannst du eine Kombination aus den oben genannten Methoden verwenden. Ein Beispiel wäre die Nutzung von TEXTVERKETTEN
, um Text und Zahlen zu kombinieren.
2. Kann ich auch Leerzeichen in einer IBAN einfügen?
Ja, du kannst die gleiche Technik verwenden, um Leerzeichen in einer IBAN einzufügen. Stelle sicher, dass du die richtige Zellreferenz im VBA-Code angibst, um die IBAN zu formatieren.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen