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

Nur bestimmte Werte aus einer Zelle auslesen

Forumthread: Nur bestimmte Werte aus einer Zelle auslesen

Nur bestimmte Werte aus einer Zelle auslesen
24.03.2003 11:42:20
Michael
Hallo,
ich habe das Problem das ich aus einer log-Datei nur bestimmte WErte der Zellen auslesen möchte. Also z.B. das °C nach dem Wert rauslöschen, damit Excel es als Zahl erkennt.
Hat jemand eine Idee???
Gruß
Micha
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Nur bestimmte Werte aus einer Zelle auslesen
24.03.2003 11:55:38
Klaus-Dieter
Hallo Micha,

so geht es:


Option Explicit
Sub werte()
Dim wer()
Dim lg As Integer
Dim z As Integer
Dim r As Integer
Dim s As Integer
z = Range("A65536").End(xlUp).Row
ReDim wer(z)
For r = 1 To z
lg = Len(Cells(r, 1))
wer(r) = Left(Cells(r, 1), lg - 1)
Next r
For s = 1 To z
Cells(s, 2) = wer(s)
Next s
End Sub
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Bestimmte Werte aus einer Zelle in Excel auslesen


Schritt-für-Schritt-Anleitung

Um in Excel einen bestimmten Text oder Wert aus einer Zelle auszulesen, kannst du VBA (Visual Basic for Applications) verwenden. 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", wähle "Einfügen" und dann "Modul".

  3. Kopiere den folgenden VBA-Code in das Modul:

    Option Explicit
    
    Sub werte()
        Dim wer()
        Dim lg As Integer
        Dim z As Integer
        Dim r As Integer
        Dim s As Integer
        z = Range("A65536").End(xlUp).Row
        ReDim wer(z)
        For r = 1 To z
            lg = Len(Cells(r, 1))
            wer(r) = Left(Cells(r, 1), lg - 1) ' Entfernt das letzte Zeichen
        Next r
        For s = 1 To z
            Cells(s, 2) = wer(s) ' Überträgt die Werte in die zweite Spalte
        Next s
    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 das Makro "werte" aus und klicke auf "Ausführen".

Mit diesem Code kannst du den bestimmten Text aus der Zelle auslesen, z.B. das "°C" von den Werten entfernen, damit Excel sie als Zahl erkennt.


Häufige Fehler und Lösungen

  • Fehler: "Typ nicht definiert"
    Lösung: Stelle sicher, dass alle Variablen korrekt deklariert sind und dass du Option Explicit am Anfang des Moduls hast.

  • Fehler: "Zelle ist leer"
    Lösung: Überprüfe, ob die Zellen, aus denen du Werte auslesen möchtest, tatsächlich Werte enthalten. Verwende gegebenenfalls If Not IsEmpty(Cells(r, 1)) Then im Code.

  • Werte werden nicht richtig übernommen
    Lösung: Achte darauf, dass der Code das richtige Zeichen entfernt (z.B. das letzte Zeichen). Du kannst den Wert auch anpassen, um spezifische Textteile auszulesen.


Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch Excel-Formeln nutzen:

  • TEXT-Funktion: Verwende eine Kombination aus LINKS, RECHTS und FINDEN, um spezifische Teile eines Zelleninhalts auszulesen.

    Beispiel:

    =LINKS(A1;FINDEN("°";A1)-1)

Diese Formel entfernt den "°"-Teil aus der Zelle A1.


Praktische Beispiele

  1. Beispiel mit Temperaturen: Wenn in Zelle A1 der Wert "25°C" steht, kannst du mit dem oben genannten VBA-Code oder der Formel den Wert "25" erhalten.

  2. Beispiel mit Text: Wenn du nur den Text "Hallo Welt!" ohne das Ausrufezeichen auslesen möchtest, kannst du die Funktion LINKS(A1;LÄNGE(A1)-1) verwenden.


Tipps für Profis

  • Nutze Push-Zellen, um Werte dynamisch zu aktualisieren, wenn sich die Quelldaten ändern.
  • Halte deine VBA-Codes modular, um die Wartbarkeit zu erhöhen. Erstelle separate Sub-Prozeduren für verschiedene Aufgaben.
  • Verwende Fehlerbehandlung in deinem VBA-Code, um unerwartete Probleme elegant zu lösen.

FAQ: Häufige Fragen

1. Wie kann ich nur einen bestimmten Teil einer Zelle auslesen?
Du kannst die Funktion TEIL oder LINKS in Excel verwenden, um nur einen bestimmten Bereich des Textes auszulesen.

2. Ist es möglich, mehrere Zellen gleichzeitig zu verarbeiten?
Ja, du kannst den VBA-Code anpassen, um mehrere Zellen in einem Rutsch zu bearbeiten, indem du die Schleife entsprechend einstellst.

3. Wie kann ich sicherstellen, dass meine Zellen nicht leer sind, bevor ich Werte auslese?
Füge eine If-Bedingung in deinen Code ein, die überprüft, ob die Zelle leer ist, bevor du den Inhalt verarbeitest.

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