Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1108to1112
1108to1112
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeichen in Spalte löschen

Forumthread: Zeichen in Spalte löschen

Zeichen in Spalte löschen
christian
Hallo
Ich möchte in einer Spalte alle Zeichen außer den Zahlen 0-9 löschen.
Hintergrund: Ich habe mit einem Texterkkennungsprogramm eine Tabelle gescannt. Leider sind dor ein paar Zeichen drin, die da nicht hingehören und die sollen weg.
Da gibt es doch bestimmt eine Lösung.
Vielen Dank
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeichen in Spalte löschen
14.10.2009 10:18:36
Björn
Hallo,
möchtest Du dann den Inhalt der ganzen Zelle löschen oder nur die ungewünschten Zeichen in der Zelle?
Gruß
Björn
AW: Zeichen in Spalte löschen
14.10.2009 10:26:44
christian
Nur die ungewünschten Zeichen. Aber nicht nur in der Zelle sondern in allen Zellen in der ausgewählten Spalte.
AW: Zeichen in Spalte löschen
14.10.2009 10:40:49
Heinz
Hallo Björn,
z.B. mit einer UDF:
Function NurZahlen(Text As String) As Long
Dim i%, tmp As Long
For i = 1 To Len(Text)
If IsNumeric(Mid(Text, i, 1)) Then tmp = tmp & Mid(Text, i, 1)
Next i
NurZahlen = tmp
End Function
Gruß
Heinz
Anzeige
AW: Zeichen in Spalte löschen
14.10.2009 10:53:07
Björn
Hallo Heinz,
die Frage wurde nicht von mir gestellt ;-)
mit Replace geht es auch.

dim zeile as integer
dim spalte as integer
spalte = 1 'für Spalte A -Anpassen
for zeile = 1 to 100 'Bereich anpassen
for i = 0 to 9
Cells(zeile,spalte).value = Replace(Cells(zeile,spalte).value, i, "")
next i
next Zeile

finde ich etwas angenehmer als die Lösung von Heinz (nicht böse gemeint)
Gruß
Björn
Anzeige
AW: Zeichen in Spalte löschen
14.10.2009 11:09:33
christian
Vielen Dank
Ich werde mich mal an dem Skript versuchen.
VÖLLIG FALSCH
14.10.2009 11:15:08
Björn
Huch, sorry,
habe falsche gelesen.
Mein Code macht genau das Gegenteil von dem was Du wolltest.
Ich lösche die Zahlen 0-9 und der Rest bleibt stehen.
Das ist für Dich natürlich nicht zielführend :-)
Tut mir leid.
Das müsstest du aber anpassen können.
Gruß
Björn
Anzeige
AW: VÖLLIG FALSCH
14.10.2009 13:51:30
christian
Sorry, aber ich bekomme das leider nicht angepaßt, zumindest nicht jetzt, da ich gerade unter hochdruck stehe und es aber dringend benötige. Könntest Du mir sagen, was ich machen muss?
Danke
AW: VÖLLIG FALSCH
14.10.2009 14:23:58
Björn
Hi,
alles schreib ich dir nicht ;-)

Dim zeile As Integer
Dim spalte As Integer
Dim zeichen As Integer 'Zeichen als ANSI-Code
spalte = 1 'für Spalte A -Anpassen
For zeile = 1 To 100 'Bereich anpassen
For zeichen = 65 To 122  'ANSI - Zeichencode evtl. anpassen
Cells(zeile, spalte).Value = Replace(Cells(zeile, spalte).Value, Chr(zeichen), "")
Next zeichen
Next zeile
Hier werden jetzt keine Satzzeichen oder ähnliches gelöscht.
Falls das auch vorkommt, dann such dir den ANSI Zeichencode (google) und setze die Zahl für die Variable "Zeichen" ein. Dann sind die auch weg.
Hoffe, das reicht Dir.
Gruß
Björn
Anzeige
AW: VÖLLIG FALSCH
15.10.2009 12:26:53
Heinz
Hallo Christian,
ich glaube, dass die Lösung mit meiner Funktion wesentlich einfacher ist (auch nicht böse gemeint).
Z.B:
Sub AllesAußerZahlenLöschen1()
Dim z As Range
'zuerst den Bereich, z.B. Spalte A markieren
For Each z In Selection
If z.Value  "" Then z.Value = NurZahlen(z.Value)
Next z
End Sub


Sub AllesAußerZahlenLöschen2()
Dim z As Range
'speziell für die Spalte A
For Each z In Range("A:A")
If z.Value  "" Then z.Value = NurZahlen(z.Value)
Next z
End Sub

Function NurZahlen(Text As String) As Long
Dim i%, tmp As Long
For i = 1 To Len(Text)
If IsNumeric(Mid(Text, i, 1)) Then tmp = tmp & Mid(Text, i, 1)
Next i
NurZahlen = tmp
End Function
Gruß
Heinz
Anzeige
;

Forumthreads zu verwandten Themen

Anzahl unterschiedl. Werte in Spalte zählen
Jakob

Hallo,
ein ähnliches Problem wurde hier im Forum schon einmal diskutiert. (https://www.herber.de/forum/archiv/632to636/t635773.htm)
Meine Problem:
Wie kann ich die Anzahl unterschiedlicher Einträge/Werte einer Spalte erhalten, ohne dass diese vorgegeben werden ( also ohne die Verwe...
14.08.2008 18:16:11
Thread-ID: 1001934
2 Beiträge
in spalte müssen 2 gleiche zahlen vorh. sein ...
Jessi

hallo zusammen,
suche nach einem makro, dass in spalte A überprüft ob von den dort geschriebenen zahlen jeweils zwei gleiche vorhanden sind. es geht um eine doppelbelegung eines zimmers. die zahl ist die zimmer-nr.
wäre z.b. nur einmal eine zahl in der spalte, wäre es möglich in das jew...
04.10.2008 15:33:00
Thread-ID: 1014154
5 Beiträge
Anzahl gleicher Elemente einer Spalte
Pascal

Hallo,
wie kann ich die Anzahl der gleichen elemente in einer Spalte ermitteln?
die Tabelle sieht etwa so aus:
1
3
0
1
1
2
0
1
das ergebis soll dieses sein:
0: 2
1: 4
2: 1
3: 1
03.11.2008 08:35:37
Thread-ID: 1021264
5 Beiträge
zahlen in zeichenkette suchen und wert zurück gebe
gatewax

Hallo,
ich habe einen Spaltenbereich xy der verschiedene Werte aus Zahlen und Texten enthält. (Bsp Asdf0001, B/123_sdf, usw.)
nun habe ich in einer weiteren spalte z zahlen stehen welche in dem spaltenbereich xy (unabhängig ob alleinstehen oder in Textkombination) vorkommen.
ich suc...
27.11.2008 08:22:20
Thread-ID: 1028208
3 Beiträge
Zahlen suchen in zwei spalten
Timo

Hallo,
ich habe ein kleines, wahrscheinlich sehr einfaches Problem.
Ich habe sowohl eine Spalte A als auch Spalte B, wo immer sechsstellige Zahlen drin stehen. Jetzt würde ich gern in Spalte C überprüfen lassen, ob die jeweilige Zahl, die in Spalte B steht, auch irgendwo in Spalte A v...
17.12.2008 08:51:00
Thread-ID: 1033514
4 Beiträge
Anzahl der Zeichen in einer Zelle
Jan

Guten Morgen
Welcher Befehl zählt die Zeichen in einer Zelle?
Danke
Gruß Jan
07.01.2009 08:38:00
Thread-ID: 1037436
3 Beiträge
Anzeige
Nur bestimmte Zeichen in Zelle
wolle

Erstmal ein Hallo an Alle und alles gute in 2009!
Ich hätte folgende Frage:
Wie kann ich es machen, dass in Spalte B von Zelle B10 bis Zelle Bxx nur die Zeichen "J" "j" "N" "n" eingeben werden können und bei Eingabe eines anderen Zeichens ein kleines Popup erscheint, das den Bediener in...
09.01.2009 11:22:25
Thread-ID: 1038162
3 Beiträge
Zahlen in Extra spalte separieren
Dirk

Hallo zusammen,
ich habe eine Liste von Adressen bei der die Hausnummer immer hinter dem Strassenamen steht. Und zwar in der selben Spalte.
Z.B. Hauptstr. 12
Kirchweg 23
u.s.w
Ich brauche die Hausnummern aber in einer extra Spalte. Hat jemand eine Idee?
Nach dem Strassen...
12.01.2009 16:55:27
Thread-ID: 1038937
8 Beiträge
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Zahlen in Spalte umpolen
andi

Hallo zusammen,
ich möchte einen Fragebogen in Excel auswerten, bei dem einige Items umgepolt sind.
So sollte ich bei einigen Items die Zahlenwerte "vertauschen
1 wird zu 5
2 wird zu 4
3 wird zu 3
4 wird zu 2
5 wird zu 1
wie kann ich die Zahlen
a) in der g...
05.02.2009 08:49:55
Thread-ID: 1047287
2 Beiträge
Ganzzahlen in Spalte zählen
MBorn

bonjour,
weiß jemand wie man mit einer Formel die Anzahl aller Ganzzahlen (Zahlen, die 0 hinter Komma haben)
in einer Spalte zählen kann?
Danke,
Born
02.04.2009 13:06:10
Thread-ID: 1066304
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige