Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Werte in Spalte nach Leerstelle löschen

Werte in Spalte nach Leerstelle löschen
11.07.2007 16:28:00
Tobias
Hallo .. ich möchte in einer Spalte alle Zahlen hinter einem Leerzeichen löschen,
wie kann man das am einfachsten machen
Gruß
Tobi

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte in Spalte nach Leerstelle löschen
11.07.2007 16:57:00
Herbert
Hi,
kommt immer nur eine Leestelle vor oder mehrere?
mfg Herbert

AW: Werte in Spalte nach Leerstelle löschen
11.07.2007 17:09:27
Tobias
es gibt nur eine.

AW: Werte in Spalte nach Leerstelle löschen
11.07.2007 17:25:00
Herbert
Hi,
suchen nach:_ * (den Unterstrich nicht eingeben, stattdessen ein Leerzeichen
ersetzen durch: (frei lassen)
mfg Herbert

Anzeige
AW: Werte in Spalte nach Leerstelle löschen
11.07.2007 17:59:16
Gromminger
wie wäre es hiermit

Sub Leerstelle_loeschen
Dim P1%, Var1$, Var2$, Var3$
Dim report as variant
Dim zeile as integer
Do until ActiveWorkbook.Worksheets(1).cells(zeile, 2).value  ""
report = ActiveWorkbook.Worksheets(1).cells(zeile, 2).value
P1 = Application.Find(" ", report, 1)
Var1 = Left(report, P1)
Var2 = right(report, P1)
Var3 = Var1 & Var2
zeile = zeile+1
Loop
End Sub


Anzeige
AW: Werte in Spalte nach Leerstelle löschen
11.07.2007 18:01:00
Gromminger
wer richtig lesen kann ist klar im Vortei :-)

Sub Leerstelle_loeschen
Dim P1%, Var1$, Var2$, Var3$
Dim report as variant
Dim zeile as integer
Do until ActiveWorkbook.Worksheets(1).cells(zeile, 2).value  ""
report = ActiveWorkbook.Worksheets(1).cells(zeile, 2).value
P1 = Application.Find(" ", report, 1)
Var1 = Left(report, P1)
ActiveWorkbook.Worksheets(1).cells(zeile, 2).value = Var1
zeile = zeile+1
Loop
End Sub


Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige