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

Forumthread: Werte zwischen Zeichen auslesen

Werte zwischen Zeichen auslesen
18.08.2005 23:20:05
Jan
Hallo,
ich habe eine Zelle mit folgendem Inhalt:
1;04_11;2.77777777777778
wie kann ich die Werte zwischen dem Semicolon in jeweils drei Varibalen auslesen. Dabei ist die Anzahl der Stellen immer unterschiedlich. Sie werden eben nur durch das Semicolon getrennt!
Vielen Dank
Jan
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte zwischen Zeichen auslesen
18.08.2005 23:33:55
Josef
Hallo Jan!
In der Tabelle am einfachsten mit "Text in Spalten" , Trennzeichen Semicolon.
Per VBA mit Split(DeinString,";")
Dann hast du die Werte in einem Array aus dem du sie Problemlos auslesen kannst!
Gruß Sepp
P.S.: Rückmeldung nicht vergessen!


Anzeige
AW: Werte zwischen Zeichen auslesen
18.08.2005 23:34:52
Ramses
Hallo
mal ein Beispiel
Sub Divide_Number()
Dim preNr As String
Dim val1 As Variant, val2 As Variant, val3 As Variant
preNr = "1;04_11;2.77777777777778"
val1 = Left(preNr, InStr(1, preNr, ";") - 1)
preNr = Right(preNr, Len(preNr) - InStr(1, preNr, ";"))
val2 = Left(preNr, InStr(1, preNr, ";") - 1)
val3 = Right(preNr, Len(preNr) - InStr(1, preNr, ";"))
MsgBox val1 & Chr$(13) & val2 & Chr$(13) & val3
End Sub

Gruss Rainer
Anzeige
AW: Werte zwischen Zeichen auslesen
18.08.2005 23:42:32
Jan
Hallo,
genau den VBA Code habe ich gesucht! Ich werde ihn morgen gleich ausprobieren!
Jan
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Werte zwischen Zeichen in Excel auslesen


Schritt-für-Schritt-Anleitung

Um Werte zwischen Zeichen in Excel auszulesen, gibt es verschiedene Methoden. Hier zeige ich dir zwei einfache Möglichkeiten: mit der Funktion "Text in Spalten" und mit VBA.

Methode 1: Text in Spalten

  1. Markiere die Zelle, die den Text enthält (z.B. 1;04_11;2.77777777777778).
  2. Gehe zu dem Reiter "Daten" in der Menüleiste.
  3. Klicke auf "Text in Spalten".
  4. Wähle "Getrennt" und klicke auf "Weiter".
  5. Setze ein Häkchen bei "Semikolon" und klicke auf "Fertigstellen".

Jetzt sind die Werte in separaten Zellen aufgeteilt.

Methode 2: VBA

  1. Öffne den VBA-Editor (Alt + F11).

  2. Füge ein neues Modul ein (Rechtsklick auf "VBAProject" > "Einfügen" > "Modul").

  3. Kopiere den folgenden Code in das Modul:

    Sub Divide_Number()
       Dim preNr As String
       Dim val1 As Variant, val2 As Variant, val3 As Variant
       preNr = "1;04_11;2.77777777777778"
       val1 = Left(preNr, InStr(1, preNr, ";") - 1)
       preNr = Right(preNr, Len(preNr) - InStr(1, preNr, ";"))
       val2 = Left(preNr, InStr(1, preNr, ";") - 1)
       val3 = Right(preNr, Len(preNr) - InStr(1, preNr, ";"))
       MsgBox val1 & Chr$(13) & val2 & Chr$(13) & val3
    End Sub
  4. Schließe den Editor und führe das Makro aus (Alt + F8).

Du erhältst die Werte in einer MessageBox.


Häufige Fehler und Lösungen

  • Problem: Die Werte werden nicht korrekt aufgeteilt.

    • Lösung: Stelle sicher, dass du das richtige Trennzeichen (Semikolon) auswählst.
  • Problem: VBA gibt eine Fehlermeldung aus.

    • Lösung: Überprüfe, ob der Code korrekt eingegeben wurde und dass die Variable preNr den richtigen Wert hat.

Alternative Methoden

Falls du keine VBA-Programmierung nutzen möchtest, kannst du auch mit Formeln arbeiten:

  • Mit Formeln:

    =LINKS(A1;FINDEN(";" ;A1) - 1)       ' Wert vor dem ersten Semikolon
    =TEIL(A1;FINDEN(";" ;A1) + 1;FINDEN(";" ;A1;FINDEN(";" ;A1)+1) - FINDEN(";" ;A1) - 1) ' Wert zwischen den Semikolons
    =RECHTS(A1;LÄNGE(A1) - FINDEN(";" ;A1;FINDEN(";" ;A1)+1)) ' Wert nach dem zweiten Semikolon

Diese Formeln helfen dir, die Werte manuell in Excel auszulesen.


Praktische Beispiele

Angenommen, du hast folgende Werte in Zelle A1:

  • 1;04_11;2.77777777777778

Mit der "Text in Spalten"-Methode erhältst du in den Zellen B1, C1 und D1 die Werte 1, 04_11 und 2.77777777777778.

Wenn du den VBA-Code ausführst, öffnet sich ein Fenster mit denselben drei Werten.


Tipps für Profis

  • Experimentiere mit weiteren Trennzeichen, indem du den VBA-Code entsprechend anpasst.

  • Nutze die Funktion Split() in VBA, um mehrere Werte in einem Schritt auszulesen:

    Dim arr() As String
    arr = Split(preNr, ";")
    MsgBox arr(0) & Chr$(13) & arr(1) & Chr$(13) & arr(2)
  • Halte deine VBA-Module gut organisiert, um die Übersichtlichkeit zu verbessern.


FAQ: Häufige Fragen

1. Was mache ich, wenn ich mehrere Semikolons in einer Zelle habe? Du kannst die oben genannten Methoden verwenden, um die Werte entsprechend zu trennen, egal wie viele Semikolons vorhanden sind.

2. Funktioniert das auch in Excel Online? Die "Text in Spalten"-Funktion ist auch in Excel Online verfügbar. VBA-Makros sind jedoch nur in der Desktop-Version von Excel verfügbar.

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