Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1164to1168
1164to1168
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Teilwerte aus Zellen auslesen

Forumthread: Teilwerte aus Zellen auslesen

Teilwerte aus Zellen auslesen
11001011
Hallo Leute,
nach intensiver Suche hier im Forum bin ich leider nicht zur nötigen Lösung gelangt.
Folgendes Problem:
In Spalte B stehen jeweils Zahlen und Text-Werte; z.B. "1304 Alpha" oder "563 Gamma". Letztendlich möchte ich via VBA nur den Zahlenwert auslesen, sodass ich damit weiterarbeiten kann (soll in einer For-Schleife Verwendung finden). Die möglichen Ansätze mit "=links(Zelle,4)" und "Left(Zelle.Value, 4)" funktionieren hier leider nicht, da der Zahlenwert zu Beginn 1-4-stellig sein kann.
Nach meiner Auffassung müsste ich nun also den Zellenwert bis ein Zeichen vor dem Leerzeichen entnehmen. Hierzu fehlt mir jedoch leider ein Befehl. Ich weiss, dass es eine Möglichkeit gibt, Zellenwerte zu splitten und in zwei verschiedene Spalten zu schreiben. Das hilft mir jedoch hier nicht weiter, da die o.g. Excel-Tabelle eine exportierte Datei ist, auf die mittels VBA automatisch zugegriffen werden soll. Hier bleibt also leider kein Spielraum, um eine zusätzliche Spalte einzufügen, in welcher dann die geteilten Zellwerde der Spalte B eingetragen werden.
Habt Ihr zufällig ein ähnliches Problem gehabt und entsprechend eine funktionale Lösung entwickelt?
Ich bin für jeden Hinweis sehr dankbar!
Viele Grüße aus Köln
Christian
Anzeige
AW: Teilwerte aus Zellen auslesen
02.07.2010 16:25:30
Beverly
Hi Christian, 
Mid("1304 Alpha", 1, InStr("1304 Alpha", " ") - 1) * 1


AW: Teilwerte aus Zellen auslesen
02.07.2010 16:30:17
11001011
Hallo und viele Dank! Mid und InStr waren mir tatsächlich nicht bekannt... und schon wieder was dazugelernt. Aber eine kurze Rückfrage hätte ich noch: wieso schreibst Du am Schluss: "* 1"?
Anzeige
Das ist nur 'ne Marotte aus der FmlPraxis;...
02.07.2010 17:43:38
Luc:-?
…damit kann man da aus Textzahlen echte Zahlen machen, Christian…
In VBA wäre eine der vbConvert-Fktt angebrachter, also hier wohl CInt bzw CLng.
Gruß Luc :-?
Genau meine Meinung : CInt() - s.o. _oT
02.07.2010 17:51:56
NoNet
_oT = "ohne Text"
Gruß, NoNet
gegen    2:1 unsere Nachbarn haben's vorgemacht : gegen    2:1

Anzeige
Kannste mal sehen, NoNet,...
02.07.2010 23:01:35
Luc:-?
…Madam geruhen unsere bescheidene (Fach-)Meinung zu ignorieren… ;->>
Gruß+schöWE, Luc :-?
Ganz schön daneben, NoNet,...
03.07.2010 20:57:57
Luc:-?
…nicht mal die Toranzahl insgesamt stimmt… ;-))
GrußLuc :-?
Ich weiß, ich war ein elender Pessimist...
04.07.2010 16:43:09
NoNet
...aber das in diesem Fall äußerst gerne
Gruß, NoNet
gegen    2:1
Anzeige
Hier scheint's realistischer, wenn... Gruß owT
05.07.2010 15:28:11
Luc:-?
:-?
...die linken Tore geschossen worden wären! owT
08.07.2010 21:26:24
Luc:-?
:-?
AW: Teilwerte aus Zellen auslesen
02.07.2010 18:50:32
Beverly
Hi Christian,
die Funktion Mid ergibt immer einen Text und durch Multiplikation mit 1 wird dieser Text (oder im gegebenen Fall diese "Textzahl") in eine "korrekte" Zahl umgewandelt.

Anzeige
Politisch korrekt oder nur EINFACH ?
02.07.2010 16:27:06
NoNet
Hallo Ë (Ist das ASCII-Zeichen für &h11001011 ;-),
suche Dir eine der beiden Varianten aus :
Sub PolitischKorrekt()
MsgBox CInt(Left(ActiveCell.Value, _
IIf(InStr(ActiveCell.Value, " ") > 0, _
InStr(ActiveCell.Value, " ") - 1, Len(ActiveCell.Value))))
End Sub


Sub EinfacherGehtsSo()
MsgBox Val(ActiveCell)
End Sub
Gruß, NoNet
gegen    2:1

Anzeige
AW: Politisch korrekt oder nur EINFACH ?
02.07.2010 16:32:31
11001011
Servus NoNet,
vielen Dank. Ich tendiere gerade zwar zu Beverly's Ansatz, aber mit Deinem werde ich gleich auch nochmal genauer rumspielen, um zu schauen, welche Lösung in meinem Fall besser anzuwenden sit.
Vielen Dank und Euch ein schönes Wochenende!
Christian
;

Forumthreads zu verwandten Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 Beiträge
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Werte aus Matrix auslesen j. mit richtiger Bsp.
trebor-robert

Hallo,
wie kann ich aus einer Matrix, die in einer separaten Arbeitsmappe (im Beispiel der Bereich Arbeitsmappe "B") liegt, den entsprechenden EUR Betrag auslesen, wenn in der Spalte "C" untereinander in den einzelnen Zeilen die Bemessungsgrösse 1 steht (in diesem Fall qm) und in den Spalt...
05.09.2008 13:33:00
Thread-ID: 1007667
5 Beiträge
Bestimmte Werte aus einer Zelle herausfiltern
G_G

Hallo zusammen.
Ich habe in einer Zelle einen etwas längeren Text (mit Zahlen und Buchstaben). Ich würde jetzt gerne hieraus den Wert rausfiltern (in separate Spalte), der neben der Buchstabenkombination "AT" steht.
Hört sich einfach an. Da gibt es aber noch einige Sonderfälle.
Ich...
15.09.2008 12:03:00
Thread-ID: 1009747
5 Beiträge
Werte aus anderem Blatt für ComboBox auslesen
mtremer

Hallo Excel-Freunde,
ich glaub ich werde verrückt.
Meine ComboBox füllt sich nicht mehr. Ich versuche den Code so zu ändern, dass die Quelle für die ComboBox wo anders stehen kann. Im folgenden Code müssen die Werte in der Spalte A der Tabelle1 stehen.
Private Sub Worksheet_Change...
17.09.2008 13:17:34
Thread-ID: 1010349
11 Beiträge
Wert aus Zelle holen für VBA
Oliver

Hallo eine kleine Frage,
wollte folgendes umsetzen, ein Benutzer fügt in der Excelobelfläche im ersten Blatt eine Zahl ein. Diese soll jetzt wie folgt verwendet werden:
falls ... größer als dem Zellinhalt, dann ...
meine Idee:
Dim Wert As Integer
Wert = cells(20, 2)
If.....
25.09.2008 10:06:31
Thread-ID: 1012241
6 Beiträge
Drei Zellen auswerten
Hanspeter

Hallo zusammen,
Wie kann ich Werte aus drei Zellen kombinieren und auswerten.
Beispiel
In der Zelle A1 können 6 mögliche Farben stehen. (rot, blau, grün, ….)
In der Zelle B1 können 6 mögliche Formen stehen (rund, oval, …….)
In der Zelle C1 können 5 mögliche Materialien stehe...
20.10.2008 09:31:03
Thread-ID: 1017582
9 Beiträge
Wert aus Datenbank auslesen
Sebastian

Hallo zusammen,
ich bin leider nicht der "Exel-Profi" und hoffe, hier Hilfe zu finden. Ich besitze eine englische Exel-Version.
Ich möchte aus einer Datenbank einen Wert auslesen und in einer 2. Tabelle (Sheet) ausgeben lassen.
Im speziellen habe ich eine Datenbank erstellt, in der...
03.11.2008 18:19:00
Thread-ID: 1021409
4 Beiträge
Wert aus Zelle übernehmen und behalten
Martin

Hallo Zusammen
Folgende Situation:
Habe eine Liste aus 4 x 2200 Zeilen mit Zahlenwerten die zum Teil auch via Formel berechnet werden.
Nun habe ich festgestell, dass ich bei einer Spalte leider einen falschen Wert erfasst habe.
Kann ich via Makro oder mit einer Formel einen Zel...
07.11.2008 09:59:13
Thread-ID: 1022545
3 Beiträge
Wert vom ausgewählten Filter in Zelle
Kurt

Hallo nochmal,
ich möchte gern den Wert vom Filter in die Zelle N1 setzen.
Hatte dies
Selection.AutoFilter Field:=4, Criteria1:=wert
ActiveSheet.Range("N1").Select = wert
mfg Kurt P
01.12.2008 15:41:00
Thread-ID: 1029285
3 Beiträge
Zellen auswerten
volker

Hai Excels,
ich hab eine Tabelle mit Zahlenwerten in Spalte "B" ~ 10000 Zeilen.
Wie kann ich Auswerten wie viele unterschiedliche ZAhlenwerte sich darin befinden?
(es sind viel doppel Zahlen vorhanden)
Danke Viele Grüsse und einen schönen Advent volker
03.12.2008 09:02:00
Thread-ID: 1029685
5 Beiträge
Anzeige
Werte aus einer Zelle auf mehrere verteilen
Bernd

Hallo,
Tabelle1

 ABCDEF1so bekomme ich es:    2      3Bleistifte Kulis Blöcke Marker Minen Scheren 100 50 150 20 30 104      5so soll es sein:    6     &...
12.12.2008 22:22:00
Thread-ID: 1032536
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Teilwerte aus Zellen auslesen in Excel

Schritt-für-Schritt-Anleitung

Um einen Teil einer Zelle in Excel auszulesen, kannst du die folgenden Schritte befolgen:

  1. VBA-Editor öffnen:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Neues Modul erstellen:

    • Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Code einfügen:

    • Füge den folgenden Code in das Modul ein, um den Zahlenwert vor dem Leerzeichen auszulesen:
    Sub TeilwertAusZelleAuslesen()
   Dim zelle As String
   Dim teilwert As Variant

   zelle = ActiveCell.Value
   teilwert = Mid(zelle, 1, InStr(zelle, " ") - 1) * 1

   MsgBox "Der Teilwert ist: " & teilwert
End Sub

  4. Makro ausführen:

    • Schließe den VBA-Editor und kehre zu Excel zurück.
    • Wähle die Zelle aus, die den Text enthält (z.B. "1304 Alpha"), und führe das Makro über Entwicklertools > Makros aus.

Häufige Fehler und Lösungen

  • Fehler: "Typ nicht unterstützt"

    • Lösung: Stelle sicher, dass die Zelle einen gültigen Textwert enthält. Leere Zellen oder nicht-Textwerte können diesen Fehler verursachen.

  • Fehler: "Leere Zelle"

    • Lösung: Überprüfe, ob die Zelle, von der du den Wert auslesen möchtest, tatsächlich Daten enthält.

  • Problem mit variablen Längen:

    • Wenn die Zahlen unterschiedlich lang sind, verwendet die Methode InStr den Index des Leerzeichens, um den Teilwert korrekt zu extrahieren.

Alternative Methoden

Falls du nicht mit VBA arbeiten möchtest, kannst du auch folgende Excel-Formeln verwenden:

  • Formel zur Extraktion des Teilwerts:

    =WERT(LINKS(A1;SUCHEN(" ";A1)-1))

    Diese Formel nimmt an, dass der Text in Zelle A1 steht. WERT konvertiert den extrahierten Text in eine Zahl.

  • Text in Spalten:

    • Du kannst die Funktion Text in Spalten unter dem Daten-Menü verwenden, um die Zellen basierend auf dem Leerzeichen zu splitten.

Praktische Beispiele

  1. Beispiel 1:

    • Bei der Zelle B2 mit dem Wert "563 Gamma" wird das Makro den Teilwert "563" auslesen.

  2. Beispiel 2:

    • Bei der Zelle B3 mit dem Wert "1304 Alpha" wird ebenfalls der Teilwert "1304" zurückgegeben.

  3. Beispiel 3:

    • Bei der Zelle B4 mit dem Wert "45 Test" wird das Ergebnis "45" angezeigt.

Tipps für Profis

  • Verwendung von CInt oder CLng:

    • Wenn du sicherstellen möchtest, dass der extrahierte Teilwert als Integer oder Long behandelt wird, kannst du die Funktionen CInt oder CLng in deinem VBA-Code verwenden.

  • Fehlerbehandlung einfügen:

    • Ergänze deinen Code mit einer Fehlerbehandlung, um unerwartete Eingaben abzufangen:
    On Error Resume Next

  • Testen verschiedener Eingaben:

    • Teste das Skript mit verschiedenen Formaten in den Zellen, um sicherzustellen, dass es robust ist.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Zellen gleichzeitig verarbeiten?
Du kannst eine Schleife in VBA verwenden, um durch mehrere Zellen zu iterieren und die Teilwerte auszulesen.

2. Was ist der Unterschied zwischen WERT und CInt?
WERT konvertiert Text zu einer Zahl, während CInt eine spezifische Umwandlung zu einem Integer-Wert vornimmt. CInt kann jedoch zu einem Fehler führen, wenn der Wert außerhalb des gültigen Bereichs liegt.

3. Funktioniert das auch in Excel Online?
VBA ist nicht in Excel Online verfügbar. Du musst die Formeln oder die Text in Spalten-Funktion verwenden.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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