Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 08:01:34
Textbox Inhalt prüfen und Code abbrechen
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1088to1092
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textfilter Zahlenfilter ohne VBA?

Textfilter Zahlenfilter ohne VBA?
lupo
Guten Morgen,
ich weiss nicht so richtig wonach ich googeln soll, deswegen folgende Frage, die es bestimmt schon ein paar Mal gegeben hat:
Gibt es eine Excel-Funktion mit der sich der Inhalt einer anderen Zelle so verändern lässt, dass alles entfernt wird, was kein Buchstabe oder keine Zahl ist?
Am liebsten ohne VBA. Aber natürlich, falls es keine Möglichkeit ohne VBA gibt, lieber mit VBA als das Problem gar nicht lösen.
Danke an Euch,
Lupo

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Textfilter Zahlenfilter ohne VBA?
28.07.2009 09:27:38
lupo
Meine weitere Recherche ein paar Erkenntnisse gebracht:
  • was ich suche wird regexp / "regular expressions" genannt

  • möglicherweise bringt "VBScript Regular Expressions 5.5" die gewünschten funktionen mit sich

    • Ohne VBA kommen die Funktionen WECHSELN und FINDEN am nähesten an das Problem heran.
    Über Korrekturen und Ergänzungen würde ich mich sehr freuen. Danke!
    AW: Textfilter Zahlenfilter ohne VBA?
    28.07.2009 09:29:14
    lupo
    Vergessen, die Frage als "noch offen" zu markieren. Hiermit nachgeholt.
    AW: Textfilter Zahlenfilter ohne VBA?
    28.07.2009 13:39:24
    Klaus
    Hallo Lupo,
    ich hätte da eine umständliche Lösung mit Hilfsspalten anzubieten:
    https://www.herber.de/bbs/user/63479.xls
    Ich lass mal offen, vielleicht schaut noch einer der Cracks hier rein und schrumpft das zu einer einzelnen Matrixformel :-)
    Grüße,
    Klaus M.vdT.
    Anzeige
    mit VBA
    28.07.2009 09:31:43
    Tino
    Hallo,
    ich kann dir nur was mit VBA anbieten.
    Dieser Code kommt in ein Modul.
    Function Clean_Special(rZelle As Range, Nur_Zahlen As Boolean, Nur_Text As Boolean)
Dim objReg As Object, objMatch As Object
Dim strPattern As String, strAusgabe
Dim A As Long

Set objReg = CreateObject("Vbscript.Regexp")

If Nur_Zahlen And Nur_Text Then
 strPattern = "\w"
ElseIf Nur_Zahlen And Not Nur_Text Then
 strPattern = "\d"
ElseIf Not Nur_Zahlen And Nur_Text Then
 strPattern = "[a-zA-ZäöüßÄÖÜ]"
End If

With objReg
    .Pattern = strPattern
    .Global = True
    Set objMatch = .Execute(rZelle.Text)
End With
Set objReg = Nothing

For A = 0 To objMatch.Count - 1
 strAusgabe = strAusgabe & objMatch(A)
Next A
If IsNumeric(strAusgabe) Then strAusgabe = strAusgabe * 1

Clean_Special = strAusgabe

End Function
    In Excel kannst Du dies wie eine Formel verwenden.
     ABC
    1hdgahg 15 °hdgahg15Text und Zahlen
    2hdgahg 15 °hdgahgNur den Text
    3hdgahg 15 °15Nur die Zahlen

    Formeln der Tabelle
    ZelleFormel
    B1=Clean_Special(A1;WAHR;WAHR)
    B2=Clean_Special(A2;FALSCH;WAHR)
    B3=Clean_Special(A3;WAHR;FALSCH)

    Gruß Tino
    Anzeige
    nochmal überarbeitet...
    28.07.2009 09:51:41
    Tino
    Hallo,
    die Funktion habe ich nochmals überarbeitet, damit die Schleife nicht so oft durchlaufen wird.
    Function Clean_Special(rZelle As Range, Nur_Zahlen As Boolean, Nur_Text As Boolean)
Dim objReg As Object, objMatch As Object
Dim strPattern As String, varAusgabe
Dim A As Long

Set objReg = CreateObject("Vbscript.Regexp")

If Nur_Zahlen And Nur_Text Then
 strPattern = "\w{1,255}"
ElseIf Nur_Zahlen And Not Nur_Text Then
 strPattern = "\d{1,255}"
ElseIf Not Nur_Zahlen And Nur_Text Then
 strPattern = "[a-zA-ZäöüßÄÖÜ]{1,255}"
End If

With objReg
    .Pattern = strPattern
    .Global = True
    Set objMatch = .Execute(rZelle.Text)
End With
Set objReg = Nothing

For A = 0 To objMatch.Count - 1
 varAusgabe = varAusgabe & objMatch(A)
Next A
If IsNumeric(varAusgabe) Then varAusgabe = varAusgabe * 1

Clean_Special = varAusgabe

End Function

    Gruß Tino
    Anzeige
    AW: nochmal überarbeitet...
    28.07.2009 14:25:11
    lupo
    Hallo Tino.
    Es funktioniert super. Vielen vielen Dank!!!
    Viele Grüße,
    Lupo

    301 Forumthreads zu ähnlichen Themen

    Summe ohne doppelte
    Benny

    Hallo zusammen,
    ich habe ein scheinend sehr einfaches Problem, aber ich komme zu keiner Lösung. Ich habe in einer Spalte Zahlen:
    1
    2
    1
    3
    4
    4
    Er soll mir nun die Zahlen addieren, jedoch doppelte nur einmal rechnen. Hier sollte also 10 herauskommen und nicht 15.
    17.11.2008 14:53:00
    Thread-ID: 1025235
    4 Beiträge
    Anzeige
    kkleinste ohne doppelte werte
    gisela

    Hallo zusammen,
    nach einigen Stunden Recherche benötige ich noch mal Eure Hilfe.
    Verschiedene Datumsangaben (siehe Datei) sollen aufsteigend ohne doppelte Werte angezeigt werden.
    Meine Formel funktioniert nur bedingt. Irgendetwas stimmt nicht.
    Kann mir bitte jemand helfen?
    h...
    31.01.2009 23:47:11
    Thread-ID: 1045792
    2 Beiträge
    Spalte auswerten ohne Duplikate mit Kriterien
    Dirk

    Hallo Forum,
    ich möchte eine Spalte dahingehend auswerten, dass ich wissen möchte wieviele VERSCHIEDENE Zahlen vorkommen, die größer sind als 31999 und kleiner als 33000 sind. Wie geht das mit einer Formel?
    Gruß aus Hannover
    Dirk
    04.03.2009 13:09:31
    Thread-ID: 1056343
    5 Beiträge
    Anzeige
    Zahlen ohne doppelte Ziffern
    oliver

    ich brauche 25'000 fünfstellige zahlen. in keiner zahl darf die selbe ziffer mehr als einmal vorkommen. wie kann ich dies im excel bewerkstelligen?
    ein beispiel falls das unlogisch klingt;
    richtige zahlen; 012324, 12345, 23456, 34567, 45678, 56789, 67890 usw...
    falsche zahlen; 01223...
    01.01.1970 00:00:00
    Thread-ID: 1067973
    46 Beiträge
    Zählen ohne Duplikate mit 5 Bedingungen
    Jonathan

    Hallo liebe Experten,
    ich stehe mal wieder vor einer Herausforderung, bei der ich Hilfe benötige.
    Ich muss in einer Spalte Materialien ohne Duplikate zählen. Diese Materialien müssen dann 5 Bedingungen in anderen Spalten erfüllen.
    Als Ergebnis soll mir dann die Anzahl ausgegben werd...
    03.07.2009 12:33:02
    Thread-ID: 1086200
    17 Beiträge
    Gültigkeite - Liste ohne doppelte Werte
    susi

    Hallo,
    ich habe eine kleines, eher optisch unschönes Problem. In einer Tabelle wird von den Nutzern auf dem ersten TB eine Liste mit Werte al la ABC1000; ABC1010 ... eingetragen. Nun können sich aber diese Werte auch wiederholen. Auf einem zweiten TB habe ich eine Spalte die sich über DATEN...
    13.08.2009 07:57:25
    Thread-ID: 1095462
    2 Beiträge
    (Spezial-) Formel für dyn. Liste ohne Duplikate
    Reinhard

    Hallo Wissende,
    Auf http://excelformeln.de/formeln.html?welcher=194 steht zwar der Satz:
    "Es gibt Array-Formeln ohne Hilfsspalte für überschaubare Bereiche."
    Der nützt mir aber nix, bräuchte ich dies Arrayformeln, wobei die vielleicht nicht ausreichen weil mein Anliegen ist speziell...
    14.10.2009 23:08:51
    Thread-ID: 1109696
    6 Beiträge
    Durchschnitt Berechnen ohne Zahlenwerte
    esMicha

    Hallo.
    Ich habe eine Frage und ich hoffe jemand kann mir helfen:
    Ich habe eine Tabelle mit Werten (Zahlen und Buchstaben gemischt), denen je eine Zahl zugeordnet werden kann.
    r = 1
    + = 2
    1 = 3
    2 = 4
    a = 5
    b = 6
    m = 7
    3 = 8
    4 = 9
    5 = 10
    Wie ka...
    27.11.2009 12:27:12
    Thread-ID: 1120501
    10 Beiträge

    Beliebteste Forumthreads (12 Monate)

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

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige
    Archiv - Verwandte Themen
    Forumthread
    Beiträge
    3
    4
    1
    4
    3
    45
    16
    1
    5
    9
    5
    4
    4
    3
    1
    2
    2
    10
    6
    2
    2
    6
    3
    1
    7