Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
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
1108to1112
1108to1112
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle auslesen und aufteilen

Forumthread: Zelle auslesen und aufteilen

Zelle auslesen und aufteilen
Georg
Hallo Zusammen,
ich lese bereits Dateinamen in jeweils einzelne Zellen ein. In diesen steht dann folgendes Format, welches ich zerlegen möchte.
es sollte jeweils beim "_" geteilt werden und in eine eigene Zelle geschrieben werden.
Es gibt zwar sehr viele Beiträge zu diesem Thema, aber konnte keines finden, das rein in vba funtkioniert und mehrere Zellen füllt.
folgendes steht in "A1"
08154711_Nachname_Vorname_A1EA_EK0_VK0_0003
und folgendes soll generiert werden:
A2 - "08154711"
A3 - "Nachname"
A4 - "Vorname"
A5 - "A1EA"
.....
Danke im Voraus.
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zelle auslesen und aufteilen
10.10.2009 11:04:07
Hajo_Zi
Hallo Georg,
warum nicht einfach, Daten, Text in Spalten Trennzeichen -

AW: Zelle auslesen und aufteilen
10.10.2009 11:04:29
Hajo_Zi
Hallo Georg,
warum nicht einfach, Daten, Text in Spalten Trennzeichen -

Anzeige
AW: Zelle auslesen und aufteilen
10.10.2009 11:04:42
Backowe
Hi Georg,
 A
108154711_Nachname_Vorname_A1EA_EK0_VK0_0003
208154711
3Nachname
4Vorname
5A1EA
6EK0
7VK0
80003

Formeln der Tabelle
ZelleFormel
A2=zelletrennen(A$1;ZEILE()-1;"_")
A3=zelletrennen(A$1;ZEILE()-1;"_")
A4=zelletrennen(A$1;ZEILE()-1;"_")
A5=zelletrennen(A$1;ZEILE()-1;"_")
A6=zelletrennen(A$1;ZEILE()-1;"_")
A7=zelletrennen(A$1;ZEILE()-1;"_")
A8=zelletrennen(A$1;ZEILE()-1;"_")


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Function ZelleTrennen(Zelle As Range, Position As Integer, Trenner As String) Dim ergebnis As Variant ergebnis = Split(Zelle, Trenner) ZelleTrennen = ergebnis(Position - 1) End Function
Anzeige
AW: Zelle auslesen und aufteilen
10.10.2009 11:29:37
Georg
Hallo Backowe,
Danke, aber ich würde das lieber ganz in vba abwickeln.
muß ich die Formeln mittels vba in die zellen schreiben, oder geht das auch irgendwie direkt aus vba?
Gruß Georg
Dann so ...
10.10.2009 11:32:18
Backowe
Hallo Georg,
Sub ZelleTrennen()
Dim Ergebnis As Variant
Dim i As Integer
Ergebnis = Split(Range("A1"), "_")
For i = LBound(Ergebnis) To UBound(Ergebnis)
Cells(i + 2, "A") = Ergebnis(i)
Next
End Sub
Gruß Jürgen
Anzeige
AW: Dann so ...
10.10.2009 11:51:21
Georg
Hi,
Ja, genau so. Vielen Dank,
Habe nur die Ausgabe korrigiert, damit ich horizontal beschreibe.
Cells(1, i + 2) = Ergebnis(i)
Nochmals vielen Dank.
AW: Ohne Schleife
10.10.2009 22:27:27
Gerd
Hallo,
auch so.
Sub Trennen()
Dim Ergebnis As Variant
Ergebnis = Split(Range("A1"), "_")
Cells(1, 2).Resize(1, UBound(Ergebnis) + 1) = Ergebnis
End Sub
Gruß Gerd
Anzeige
;

Forumthreads zu verwandten Themen

Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Zeilen mit bestimmten Inhalt löschen
sascha76er

Hallo,
ich möchte immer alle Zeilen via Makro löschen, wenn der Inhalt der Zeile indentisch mit der ersten ist.
Ist das möglich, wenn ja wie?
Vorab vielen Dank
Sascha
08.12.2008 13:35:00
Thread-ID: 1031058
6 Beiträge
Anzeige
Text in Fußzeile aus Zelle ziehen
Sandra

Hallo zusammen!
Ich brauche mal wieder Eure Hilfe.
Meine Exceltabelle (ein Protokoll) soll im linken Teil der Fußzeile einen Text bekommen, der automatisch aus einer Zelle gezogen wird. So das sich die Fußzeile immer aktualisiert, wenn die Zelle geändert wird. Mit einer Formel geht es j...
29.01.2009 11:29:24
Thread-ID: 1044904
23 Beiträge
Zufällig einen Text ausgeben aus best. Zellen
Eddie

Hallo und Guten Abend.... habe mal wieder ein Problem...
Ich will gerne aus einer Anzahl von zellen (ca 100 Zeilen) .. wo bestimmte Sätze drin stehen diese Zufällig in einer Bestimmten zelle anzeigen lassen ....
Vielleicht hat ja jemand schon sowas gemacht ?
thx schon einmal
G...
15.02.2009 20:14:00
Thread-ID: 1050974
7 Beiträge
gewisse sonderzeichen aus zelle entfernen
Tobias

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
28.02.2009 15:56:56
Thread-ID: 1055091
8 Beiträge
Teilwert aus Zelle suchen und selektieren
Addi

Hallo Zusammen,
folgendes Problem:
Ich habe eine Excel Liste mit Buchungstexten, die zum Teil so aussehen:
"Rg. Hilton/Beherb./F.Schulze/10.03.08"
Aus dieser Zelle möchte ich den Namen selektieren und einzeln in die Zelle daneben schreiben.
Die jeweiligen Namen sind bekannt...
20.03.2009 07:54:45
Thread-ID: 1062031
10 Beiträge
Zugriff auf auf Teilinhalte einer Zelle
Der

Hallo da Draußen!
Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
20.03.2009 14:52:09
Thread-ID: 1062230
5 Beiträge
Teilinhalte aus Zellen löschen
Der

Hallo da draußen,
ich möchte aus einer Zelle die ersten x Zeichen von links löschen und die Restlichen beibehalten. Mit dem Befehl left(cells(R,C),x) kann ich auf diese Zeichen zugreifen und sie auch auslesen. Wie kann ich sie nun löschen?
Danke für Eure Hilfe!
Grüße aus der Hauptst...
25.03.2009 15:20:24
Thread-ID: 1063841
9 Beiträge
Text aus mehreren Zellen in eine Zelle schreiben.
Wolle

Hallo Forum,
möchte Texte aus mehreren Zellen in eine Zelle schreiben. Diese "Gesamtzelle" muss ich mit Strg+V nach Word kopieren können.
Ich denke mit Formeln ist da nichts zu machen, sondern mit VBA?
Könnt Ihr helfen.
Danke und Gruß
Wolle
https://www.herber.de/bbs/user...
31.03.2009 08:34:39
Thread-ID: 1065488
4 Beiträge
Tabelle als Text speichern, Dateiname aus Zelle
Jürgen

Hallo Excel-Profis,
ich möchte über ein Makro folgendes ausführen:
- das aktuelle Tabellenblatt soll im Textformat gespeichert werden
- das Dialogfeld "Speichern unter" soll am Bildschirm erscheinen
- der Dateiname soll aus der Zelle I1 in das Dialogfeld übernommen werden
Im...
08.04.2009 13:05:46
Thread-ID: 1067706
2 Beiträge
Anzeige
Teil einer Formel in Zelle einlesen
Bernd

Hallo Freaks,
ich bastle nun schon geraume Zeit an einem Code, der mir in eine Zelle den Teil einer Formel (Kostenstellennamen) aus einer anderen Zelle schreibt.
Der nachstehene Code (von einem ausgeschiedenen Kollegen) ersetzt einen KST-Namen in einem Link mit einem neuen KST-Namen aus...
13.04.2009 12:55:24
Thread-ID: 1068432
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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