Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeichen entfernen bis erste Buchstabe

Zeichen entfernen bis erste Buchstabe
dieter(drummer)
Hi Spezialisten/innen,
suche eine Formel für entfernen von Zeichen (Text) bis zum ERSTEN Buchtaben. Beginn ist Zelle A2 und Ende ist A88. Text sieht bisher so aus:
Zelle A2) 01.02.2010 09:12 3.593.751 Into the great wide open.mp3
Zelle A3) 01.02.2010 09:14 5.959.401 Walk of life.mp3
usw.
Danke für evtl. Hilfe.
Gruss, Dieter(Drummer)
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zeichen entfernen bis erste Buchstabe
07.02.2010 11:23:10
Reinhard
Hallo Dieter,
=TEIL(A2;28;99)
=TEIL(A3;28;99)
Gruß
Reinhard
AW: Noch nicht ganz ...
07.02.2010 11:31:17
dieter(drummer)
Danke Reinhard,
soe klappt es noch nicht, da vor dem beginnenden 1. Textbuchstaben mehrere Leerzeichen sind, die nicht richtig in meinem Mustertext zu sehen waren.
Eine gute Lösung wäre wohl, wenn man von RECHTS beginnend suchen würde und dann alles vor dem ersten Buchstaben löschen würde.
Muster: 01.02.2010 09:12 3.593.751 Into the great wide open.mp3
Hier sollte dann alles vor dem "I" von "Into ..." alles gelöscht werden. Die Musiktitel haben unterschiedliche Namen also unterschiedliche Menge an Buchtaben.
Geht das?
Gruß Dieter(Drummer)
Anzeige
AW: Noch nicht ganz ...
07.02.2010 11:35:31
Reinhard
Hallo Dieter,
=TEIL(GLÄTTEN(A2);28;99)
Gruß
Reinhard
AW: Zeichen entfernen bis erste Buchstabe
07.02.2010 11:25:31
ransi
Hallo Dieter
Hier mal ein Schnellschuss :
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit


Public Function machs(zelle)
Dim Regex As Object
Set Regex = CreateObject("VbScript.Regexp")
With Regex
    .Pattern = "^[^A-Za-zÄÖÜäöüß]+"
    .Global = False
    machs = .Replace(zelle.Text, "")
End With
End Function


Tabelle2

 AB
101.02.2010 09:12 3.593.751 Into the great wide open.mp3Into the great wide open.mp3
201.02.2010 09:14 5.959.401 Walk of life.mp3Walk of life.mp3

Formeln der Tabelle
ZelleFormel
B1=machs(A1)
B2=machs(A2)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
ransi
Anzeige
AW: Danke Reinhard und Ransi ... funkoiniert
07.02.2010 11:41:41
dieter(drummer)
... Danke, Function und Formel funktionieren prima!
Danke und einen schönen Sonntag.
Gruß Dieter(Drummer)
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige