Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1244to1248
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

An 4. Stelle ein Leerzeichen

An 4. Stelle ein Leerzeichen
Gregor
Hallo
Wie kann ich per VBA in den Zellen in Spalte B an immer an 4. Stelle ein Leerzeichen setzen.
zB.
S1822345 mus heissen S18 22345
Danke und Gruss
Gregor

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: An 4. Stelle ein Leerzeichen
06.01.2012 16:49:05
Hajo_Zi
Hallo Georg,
warum nicht Zahlenformat?
Tabelle3
 D
17S01 23456

Zahlenformate
Zelle Format Wert
D17 "S"00 00000123456
Zellen mit Format Standard werden nicht dargestellt

Tabellendarstellung in Foren Version 5.47



Anzeige
AW: An 4. Stelle ein Leerzeichen
06.01.2012 16:49:33
Josef

Hallo Gregor,
freihändig!

Dim rng As Range
For Each rng In Columns(2).SpecialCells(xlCellTypeConstants).Cells
If Len(Trim$(rng)) > 3 Then
rng = Replace(rng, " ", "")
rng = Left(rng, 3) & " " & Mid(rng, 4)
End If
Next


« Gruß Sepp »

Anzeige
In allen Zellen von B an 4. Stelle ein Leerzchn...
06.01.2012 16:50:38
B
…geht bspw so, Gregor:
Dim xZ As Range
For Each xZ In ActiveSheet.UsedRange.Columns(2)
xZ = Left(xZ, 3) & " " & Mid(xZ, 4)
Next xZ
Gruß Luc :-?
AW: In allen Zellen von B an 4. Stelle ein Leerzchn...
06.01.2012 17:03:07
B
Hoi zäme
Vielen Dank, Vorschlag Luc ist perfekt
Gruss Gregor

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige