Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1236to1240
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

Buchstaben aus Spalte löschen

Buchstaben aus Spalte löschen
Kai
Hallo,
wie kann ich denn mit einer Schleife und dem Replace-Befehl (vermute ich) die Spalte K durchlaufen und alle Buchstaben und Sonderzeichen löschen ?
Also, letztendlich will ich in dieser Splate nur noch ZIFFERN.
Danke
Kai

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
prüfe auf -> If IsNumeric() kwT
25.11.2011 10:42:45
Matthias
AW: prüfe auf -> If IsNumeric() kwT
25.11.2011 11:13:12
Kai
Hallo Matthias,
wenn ich aber zB ein Feld habe , das Buchstaben und Ziffern hat, wird das nicht übergangen ?
Kai
Du mußt jedes Zeichen prüfen -> siehe Reinhard owT
25.11.2011 12:26:43
Matthias
AW: Buchstaben aus Spalte löschen
25.11.2011 10:50:22
guentherh
mal freihändig probiert, ohne Syntax- und Schleifenprüfung:
for each zellchen in range("K1:K" & usedrange.rows.count).cells
Text=zellchen.text
Text2=""
for i=1 to len Text
buchstabe=mid(Text,i,1)
select case buchstabe
case "0"..."9":
Text2=Text2 & buchstabe
end select
next i
zellchen=Text2
next
Fehler in for i=1 to len Text
25.11.2011 11:14:45
Kai
HI
Danke,
das ist ein Syntaxfehler drin und ich komme nicht darauf welcher.
GRuß
Kai
AW: Fehler in for i=1 to len Text
25.11.2011 11:55:07
Reinhard
Hallo Kai,
For Each zellchen In Range("K1:K" & Cells(Rows.Count, 11).End(xlUp).Row)
Text1 = zellchen.Text
Text2 = ""
For i = 1 To Len(Text1)
If IsNumeric(Mid(Text1, i, 1)) Then Text2 = Text2 & Mid(Text1, i, 1)
Next i
zellchen.Value = Text2
Next

Gruß
Reinhard
Anzeige
Danke, jetzt gehts, owT
25.11.2011 12:44:22
Kai

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige