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

letzte Zeichen einer Zelle ermitteln

Forumthread: letzte Zeichen einer Zelle ermitteln

letzte Zeichen einer Zelle ermitteln
25.06.2022 17:54:48
Edi
Hallo Liebe Exculatoren
Da mir hier schon oft geholfen wurde hätte ich gerne mal wieder eine Frage:
Ich habe in Zelle A1einen Text, der immer gleich lautet und mit einem Doppelpunkt endet.
Danach kommt eine Zahl, die 1 bis 4 Stellen haben kann.
Also z.B. "Hier ist der Text:123"
Jetzt benötige ich diese Zahl. Das Problem ist, dass ich eben nicht weiß, wie viele Stellen diese Zahl hat. Wie gesagt, von 1 bis 2000 ist alles drin.
Ich benötige eine Lösung in vba, da mit der Zahl weiter gearbeitet wird.
Stehe gerade echt auf dem Schlauch, aber bestimmt hat hier jemand eine Idee.
Vielen Dank schonmal
Edi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: letzte Zeichen einer Zelle ermitteln
25.06.2022 18:03:36
JoWE
angenommen Dein Text ("Hier ist der Text:123") steht in A1, dann diese Formel in B1:
=TEIL(A1;FINDEN(":";A1;1)+1;99)*1
das ergibt den numerischen Wert 123, damit kannst Du rechnen.
Gruß
Jochen
AW: letzte Zeichen einer Zelle ermitteln
25.06.2022 18:03:40
Oberschlumpf
Hi Edi
versuch mal

Sub test()
Dim larstrZahlsuche() As String, lZahl
larstrZahlsuche = Split(Range("A1").Value, ":")
lZahl = CLng(Trim(larstrZahlsuche(UBound(larstrZahlsuche))))
MsgBox "Die gesuchte Zahl ist: " & lZahl
End Sub
Hilfts?
Ciao
Thorsten
Anzeige
AW: letzte Zeichen einer Zelle ermitteln
25.06.2022 18:11:37
onur 

     Dim txt, i, le
txt = Cells(1,1).Text
le = Len(txt)
i = InStr(txt, ":")
txt = CDbl(Mid(txt, i + 1, le - i))

AW: letzte Zeichen einer Zelle ermitteln
25.06.2022 18:23:48
Edi
Wow, super vielen Dank. Das ging ja schnell
@Oberschlumpf
vielen Dank, genau das habe ich gesucht.
@JoWe
auch eine super Lösung, hätte auch beinahe funktioniert, wenn in dem echten Text nicht drei Doppelpunkte vorkommen würden.
außerdem benötige ich eine vba-Lösung.
Trotzdem vielen Dank
@onur
Wenn ich das i durch die feste Position ersetze (Der letzte Dopplepunkt steht immer an Position 31) funktioniert auch das super.
Herzlichen Dank
Jetzt habe ich nur noch die Qual der Wahl :)
Anzeige
und wenn überhaupt kein Doppelpunkt vorkommt ?
25.06.2022 18:38:43
WF
dann das Ergebnis "" oder doch die Zahl ?
WF
AW: und wenn überhaupt kein Doppelpunkt vorkommt ?
25.06.2022 21:10:01
Edi
Verstehe ich jetzt nicht ganz.
Da kommen immer drei Doppelpunkte vor. Der Text ist immer genau der gleiche.
Nur die Zahl ändert sich und die brauche ich.
ein "" nutzt mir nichts
AW: und wenn überhaupt kein Doppelpunkt vorkommt ?
26.06.2022 14:39:36
Daniel
Hi
Wenn immer drei Doppelpunkte vorkommen, kannst du mit Wechseln auch gezielt den 3. Doppelpunkt durch an anderes, sonst im Text nicht vorkommendes Zeichen ersetzen und nach diesem suchen:

=Teil(A1;Finden("|";Wechseln(A1;":";"|";3))+1;99)
Eine andere Methode ist, dass du wenn du den Teil nach dem letzten Doppelpunkt suchst, du diese durch eine größere Anzahl von Leerzeichen ersetzt (mehr als die gesuchte Zeichenkette maximal lang sein kann) und dann liest du einfach die entsprechende Anzahl Zeichen von rechts aus. Die Überzähliegen Leerzeichen kannst du mit Glätten entfernen.

=Glätten(Rechts(Wechseln(A1;":";"         ");10))
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Wenn in Zelle folgende Zeichen, dann
mehmet

Hallo Forum,
in Spalte G4:G92 sind folge Codes:
in G4= TAF LSZH 090600Z 090716 VRB03KT 0200 FG VV001 BECMG 0709 CAVOK=
in G5= TAF DTTA 090600Z 090716 VRB03KT 0700 FG BKN013 BECMG 1012 07010KT 8000 SCT026=
in G6= TAF EPKT 090500Z 090615 24002KT 0500 FG NSC BECMG 0608 26005KT 9999...
09.09.2008 09:39:00
Thread-ID: 1008320
6 Beiträge
Wenn feste Zeichenfolge in Textbox, dann...
Lenni

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....
27.04.2009 22:31:44
Thread-ID: 1071497
3 Beiträge
Anzeige
Wenn bestimte zeichen zahl dann.
gerhard

Hallo
habe eine Frage. Ich habe schon mit einigen Formeln mehr rum experimentiert habe es nicht geschaft.
Ich möchte in "C2" überprüfen ob ein zeichen da ist wenn ja dann in "D1" einen text +"C2" rein schreiben.
=WENN(C2="";"";WENN(LÄNGE(C2=1);"000"&C2;WENN(C2=2*(LÄNGE(C2));"00...
08.01.2016 01:50:09
Thread-ID: 1467723
3 Beiträge
wenn Zeichen in Zelle dann Makro
Patrick
Guten Abend Allerseits,
Gerne würde ich um Eure Hilfe für folgende Problemstellung bitten.
Im angehängten Beispiel: https://www.herber.de/bbs/user/105196.xlsx
befinden sich in der Spalte B Werte zusammen mit einem Buchstaben (B=Billions, M=Millions).
Wäre es mit einem Makro möglich...
24.04.2016 19:47:39
Thread-ID: 1489973
9 Beiträge
Wenn letztes Quartal dann "JA", sonst "QA"
Berndt

Kann mir dafür jmd. eine Formel schreiben:
wenn ich mich aktuell im letzten Quartal befinde, dann schreibe mir "JA", ansonsten "QA"
Danke.
VG Berndt
16.08.2016 14:24:05
Thread-ID: 1509575
9 Beiträge
Anzeige
Letzte Zeichen eines Textes ausgeben
Jenny

Hallo an euch alle,
gibt es eine Formel, die mir alles aus dem Text in F1 ausgibt, das auf das letzte "/" folgt?
Mit der Teil Formel komme ich irgendwie nicht weiter, da sowohl die Anzahl der Zeichen vor dem letzten "/", als auch die Anzahl der "/" als auch die Anzahl der Zeichen nach d...
05.05.2018 07:28:16
Thread-ID: 1622930
11 Beiträge
Anzeige
Wenn Zelle gleich Zeichenfolge, dann Kommazahl
Georg

Hi!
Ich würde gern in unten genannter Datei in den jeweiligen Zellen der Spalte C die Kommazahl 1,042 erhalten.
https://www.herber.de/bbs/user/130818.xlsm
Allerdings macht er eine 1042 daraus. Habt ihr eine Lösung parat?
Danke.
10.07.2019 15:29:45
Thread-ID: 1701822
3 Beiträge
letzten 3 Stellen einer Formel auslesen
Andreas

Hallo!Ich hab ein Problem. In einer Zelle (nennen wir sie Arbeitsblatt Meier Zelle A2) habe ich eine Verknüpfung zu einer anderen Zelle (Arbeitsblatt Plan Zelle A14)... diese Verknüpfung sieht dann wie folgt aus:=Plan!A14Jetzt möchte ich die letzten 3 Stellen dieser Formel auslesen (d.h. das A1...
05.03.2003 09:38:30
Thread-ID: 227419
3 Beiträge
Funktion erste 2 und letzte 4 Zeichen im String su
Anja

hallo Leute,
ich habe kleines Problemmchen...
Ich möchte eine Abfrage scheiben:
Wenn erste zwei Zeichen= "//" und der 4-te Zeichen von Ende = "."
dann tu und so weiter...
Wie geht es?
Kann mir bitte jemand hlefen...
Vielen Dank...
Viele Gruüße
Anja
02.03.2005 13:06:40
Thread-ID: 579434
8 Beiträge
Die letzten 8 Zeichen einer Zelle löschen
Jörn

Hallo,
weiß jemand wie ich in einer Zelle, automatisiert, die letzten 8 Zeichen löschen kann.
Ich arbeite viel mit Teilergebnissen, möchte das Wort Ergebnis aber nicht hinter den Teilergebnissen stehen haben, da ich danach mit Sverweisen arbeite.
Vielen Dank im voraus !!!
Grüße...
21.04.2005 15:24:48
Thread-ID: 602094
2 Beiträge
Wenn >255 Zeichen, dann bed. Format
Flo

Hallo,
Bitte - glaube nicht, dass das besonders schwer ist, aber mir fehlt die Formel - Wie kann ich eine bedingte Formatierung machen, die auf zb grün geht, wenn in einer Zelle mehr als 255 Zeichen sind?
Formel ist... ?
Liebe Grüße und Danke gleich im Vorraus,
Flo
08.09.2005 13:24:27
Thread-ID: 664399
3 Beiträge
Zelleninhalt ohne letzten 4 Zeichen
petra

Hallo zusammen,
würde gerne aus B1 den Inhalt von A1 ohne die letzten 4 Zeichen.
Geht das ?
Danke für eure hilfe
26.01.2006 19:38:21
Thread-ID: 724568
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Letzte Zeichen einer Zelle ermitteln

Schritt-für-Schritt-Anleitung

Um die letzten Zeichen einer Zelle in Excel zu ermitteln, kannst Du verschiedene Ansätze verfolgen. Hier sind die Schritte, um die letzte Zahl nach einem Doppelpunkt in einer Zelle zu extrahieren:

  1. Lege Deinen Text in Zelle A1 ab: Zum Beispiel "Hier ist der Text:123".

  2. Verwende eine Formel: In Zelle B1 kannst Du folgende Formel einsetzen:

    =TEIL(A1; FINDEN(":"; A1) + 1; 99) * 1

    Diese Formel extrahiert die Zeichen nach dem Doppelpunkt und konvertiert sie in einen numerischen Wert.

  3. VBA-Lösung: Wenn Du mit VBA arbeiten möchtest, kannst Du den folgenden Code verwenden:

    Sub letzteZeichen()
   Dim larstrZahlsuche() As String
   Dim lZahl
   larstrZahlsuche = Split(Range("A1").Value, ":")
   lZahl = CLng(Trim(larstrZahlsuche(UBound(larstrZahlsuche))))
   MsgBox "Die gesuchte Zahl ist: " & lZahl
End Sub

    Dieser Code teilt den Text an den Doppelpunkten und gibt die letzte Zahl aus.

Häufige Fehler und Lösungen

  • Problem: Die Formel gibt einen Fehler zurück.

    • Lösung: Stelle sicher, dass der Text in der Zelle tatsächlich einen Doppelpunkt enthält. Wenn nicht, könnte die Formel nicht funktionieren.

  • Problem: Mehrere Doppelpunkte im Text.

    • Lösung: Du kannst den dritten Doppelpunkt gezielt ansprechen, indem Du die WECHSELN-Funktion verwendest: 
      =TEIL(A1; FINDEN("|"; WECHSELN(A1; ":"; "|"; 3)) + 1; 99)

Alternative Methoden

  1. Zeichenlänge ermitteln: Um die Länge der Zeichenkette zu ermitteln, kannst Du die LEN-Funktion nutzen.

    =LEN(A1)

  2. Die letzten 4 Zeichen anzeigen: Um die letzten 4 Zeichen einer Zelle anzuzeigen, benutze die RECHTS-Funktion.

    =RECHTS(A1; 4)

  3. Glätten von Leerzeichen: Um unerwünschte Leerzeichen zu entfernen, kannst Du die GLÄTTEN-Funktion verwenden:

    =GLÄTTEN(RECHTS(WECHSELN(A1; ":"; "         "); 10))

Praktische Beispiele

  • Beispiel 1: Angenommener Text: "Hier ist der Text:9876"

    • Verwende die Formel =TEIL(A1; FINDEN(":"; A1) + 1; 99) für den Wert 9876.

  • Beispiel 2: Angenommener Text: "Daten:1234 und mehr"

    • Nutze =RECHTS(A1; 4) um die letzten 4 Zeichen " mehr" zu extrahieren.

Tipps für Profis

  • Dynamische Formeln: Wenn sich die Struktur Deines Textes ändert, ist es hilfreich, dynamische Formeln zu verwenden, die sich anpassen können.
  • VBA für komplexe Aufgaben: Nutze VBA, wenn Du häufig ähnliche Aufgaben erledigen musst. Du kannst Makros erstellen, um die Effizienz zu steigern.
  • Fehlerbehandlung: Implementiere Fehlerbehandlungen in Deinen VBA-Skripten, um Probleme bei der Ausführung zu vermeiden.

FAQ: Häufige Fragen

1. Wie finde ich das letzte Vorkommen eines Zeichens in Excel?
Du kannst die FINDEN-Funktion in Kombination mit WECHSELN verwenden, um das letzte Vorkommen eines Zeichens zu ermitteln.

2. Kann ich die letzten 3 Zeichen einer Zelle auslesen?
Ja, dafür kannst Du die RECHTS-Funktion verwenden:

=RECHTS(A1; 3)

3. Was mache ich, wenn kein Doppelpunkt vorkommt?
Du kannst eine IF-Bedingung verwenden, um zu überprüfen, ob der Doppelpunkt existiert, und dann eine alternative Ausgabe definieren.

4. Wie kann ich die Zeichenlänge eines Textes ermitteln?
Verwende die LEN-Funktion, um die Anzahl der Zeichen in einer Zelle zu zählen:

=LEN(A1)

Beliebteste Forumthreads (12 Monate)

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