Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Mehrstellige Zahl in einzelne Zeichen zerlegen

Forumthread: Mehrstellige Zahl in einzelne Zeichen zerlegen

Mehrstellige Zahl in einzelne Zeichen zerlegen
26.07.2002 12:42:29
sonny0815
Hallo,

ich kann mich dran erinnern, daß es in BASIC eine Funktion gab, mit der man bei Worten bzw. Zahlen ein bestimmtes Zeichen herausfiltern konnte.

Beispiel:

Ich habe das Wort 'Gummibaum' und möchte jetzt einer Variable den 4. Buchstaben des Wortes zuordnen (in diesem Fall das 'm').


Weiß jemand, ob das mit VBA in Excel auch irgendwie geht?

greetz
sonny0815

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Mehrstellige Zahl in einzelne Zeichen zerlegen
26.07.2002 12:45:49
Klausimausi64
Variable = Mid("Gummibaum",4,1)

CU Klaus

Re: Mehrstellige Zahl in einzelne Zeichen zerlegen
26.07.2002 12:48:53
sonny0815
Danke für die schnelle Antwort.
werde es gleich mal versuchen.

greetz
sonny0815

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Mehrstellige Zahl in einzelne Zeichen zerlegen


Schritt-für-Schritt-Anleitung

Um eine mehrstellige Zahl in Excel in einzelne Zeichen zu zerlegen, kannst du die VBA-Funktion Mid verwenden. Diese Funktion ermöglicht es dir, ein bestimmtes Zeichen aus einem String zu extrahieren. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke Alt + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf VBAProject (deine Arbeitsmappe) > Einfügen > Modul.

  3. Gib den folgenden Code ein:

    Sub ZahlZerlegen()
       Dim zahl As String
       Dim zeichen As String
       Dim position As Integer
    
       zahl = "1234567890123456789" ' Deine 19-stellige Zahl
       position = 4 ' Hier gibst du die Position an, die du möchtest (4. Zeichen)
    
       zeichen = Mid(zahl, position, 1)
       MsgBox "Das Zeichen an dieser Stelle ist: " & zeichen
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus: Drücke Alt + F8, wähle ZahlZerlegen und klicke auf Ausführen.


Häufige Fehler und Lösungen

  • Fehler: "Typen nicht übereinstimmend": Stelle sicher, dass die Variable zahl als String deklariert ist. Wenn du mit Zahlen arbeitest, kann Excel sie manchmal automatisch als Zahl interpretieren.

  • Fehler: "Index außerhalb des Bereichs": Dies passiert, wenn du eine Position wählst, die größer als die Länge der Zahl ist. Achte darauf, dass die Position innerhalb der Länge der Zahl liegt.


Alternative Methoden

Wenn du Excel ohne VBA verwenden möchtest, gibt es auch eine Möglichkeit, Zahlen direkt in Zellen aufzuteilen. Du kannst die TEXT und TEIL Funktionen verwenden:

  1. Nehmen wir an, deine Zahl steht in Zelle A1.
  2. Verwende die folgende Formel, um das 4. Zeichen zu extrahieren:

    =TEIL(A1;4;1)

Diese Methode ist nützlich, wenn du schnell auf bestimmte Zeichen zugreifen möchtest, ohne VBA zu verwenden.


Praktische Beispiele

Angenommen, du hast die Zahl 1234567890123456789 in Zelle A1 und möchtest das 4. Zeichen extrahieren. Du kannst entweder die VBA-Methode oder die Excel-Formel verwenden:

  • Mit VBA: Nutze das oben angegebene Makro, um das Zeichen an der gewünschten Position zu erhalten.
  • Mit Formel: Setze die Formel =TEIL(A1;4;1) in eine andere Zelle ein, um das Zeichen 4 zu erhalten.

Tipps für Profis

  • Verwende die LEN Funktion: Um die Länge einer Zahl zu überprüfen, kannst du =LEN(A1) verwenden. Das hilft dir, sicherzustellen, dass du nicht außerhalb des Bereichs zugreifst.

  • Zahlen in Wörtern umwandeln: Wenn du eine Zahl in Wörtern darstellen möchtest, kannst du eine benutzerdefinierte Funktion erstellen. Diese Funktion kann auf Basis der Zerlegung der Zahl in Zeichen arbeiten.


FAQ: Häufige Fragen

1. Kann ich auch Buchstaben aus einem Wort extrahieren?
Ja, die Funktion Mid funktioniert auch mit Wörtern. Du kannst einfach den gewünschten Text eingeben.

2. Funktioniert das auch in älteren Excel-Versionen?
Ja, die Mid Funktion ist seit vielen Excel-Versionen verfügbar, daher sollte es in den meisten Fällen funktionieren.

3. Wie kann ich mehrere Zeichen gleichzeitig extrahieren?
Du kannst die Mid Funktion anpassen, indem du die Anzahl der Zeichen änderst, die du extrahieren möchtest. Zum Beispiel: Mid(zahl, 4, 2) gibt die Zeichen an Position 4 und 5 zurück.

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