Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.06.2025 16:21:37
Eingabe Rechnungsnummer, dann "1" in bestimmte Spalte
23.06.2025 15:23:20
Rechnungsnummer aus datenbaank mit 2 kontrollen
23.06.2025 14:25:48
Bedingte Formatierung oder Formel
23.06.2025 13:53:13
Compilierungsprogramme
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
1008to1012
1008to1012
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mehrere Dateien in eine Tabelle zusammenfassen

Forumthread: Mehrere Dateien in eine Tabelle zusammenfassen

Mehrere Dateien in eine Tabelle zusammenfassen
12.09.2008 09:46:00
Reptil
Guten Morgen zusammen.
ich weiß, ähnliche fragen waren schon häufiger hier, aber genau das was ich suche habe ich nicht gefunden.
ich habe mehrere Exceltabellen, in zwei ordnern, aus denen ich bestimmte daten in eine andere auslesen möchte. dabei sollen erstens nicht alle daten gelesen werden, sondern nur bestimmte. dabei sind die spalten, in denen die informationen zu finden sind, immer gleich, die zeile kann sich allerdings verändern.
des weiteren möchte ich den namen der quelldatei in die zieldatei eintragen, um später die werte auch zuordnen zu können.
ich habe mal eine beispieldatei angehängt, um den aufbau der quelltabelle zu zeigen.
https://www.herber.de/bbs/user/55339.xls
auslesen möchte ich daraus folgendes:
dieses ABC/P in zeile 9, wobei dabei "/P" bei allen dateien vorhanden ist, das ABC wird durch 3 andere buchsteben ersetzt.
die kostenstellennummer in zeile 10, wobei es auch fälle gibt, bei denen hier statt einer zahl ein * steht
die gelbe summenspalte, und zwar von spalte C bis spalte O. diese Zeile kann jedoch, je nach menge der leistungsarten, verschoben sein.
ich hoffe, das mir jemand von euch helfen kann : )
liebe grüße
marco
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Kategorie
Datenübernahme
Tags
#daten extrahieren #daten filtern #vba
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
AW: Mehrere Dateien in eine Tabelle zusammenfassen
12.09.2008 14:09:27
fcs
Hallo Marco,
ich hab dir mal eine Steuerungs-Datei aus meinem Bestand angepasst.
https://www.herber.de/bbs/user/55347.xls
Bei der Funktion, die die Kostenstelle aus dem Text in Zelle B19 isoliert, hab ich mangels Beispieldaten improvisiert.
Die Function sucht die 1. Ziffer im Text und danach das nachfolgende Leerzeichen, um die KST-Nummer auszuschneiden. Ich hoffe, dass in dem Text davor keine Ziffern vorkommen.
Wegen der in den Quelldateien vorhandenen Makros geht das Öffnen der Quelldateien ziemlich schleppend voran. Die aktuell eingelesene Datei wird immer in der Statuszeile angezeigt.
Gruß
Franz
Anzeige
AW: Mehrere Dateien in eine Tabelle zusammenfassen
12.09.2008 14:31:00
Reptil
....ich bin platt...
ich werd noch n bissel was anpassen müssen, aber des file kann um einiges mehr, als ich erwartet hab...
vielen dank : D
AW: Mehrere Dateien in eine Tabelle zusammenfassen
15.09.2008 08:32:19
Reptil
hallo franz
ich bin beim umarbeiten deies codes noch auf ein problem gestoßen.
und zwar wollte ich in der spalte a statt dem verzeichnisnamen dem Dateinamen noch etwas zuordnen. dazu wollte ich eine select case abfrage schreiben.

Dim Firmenname As String
wksZiel.Cells(ZeileDaten, 2) = wbQuelle.Name 'Name Quelldatei
Select Case Firmenname
Case wbQuelle.Name = "49155.xls"
Firmenname = "Fabrik A"
Case Else
Firmenname = "test"
End Select
wksZiel.Cells(ZeileDaten, 1) = Firmenname  'Firmenname
wksZiel.Cells(ZeileDaten, 3) = fncABC_P(.Range("B9").Text) 'Beschreibungstext
wksZiel.Cells(ZeileDaten, 4) = fncKST(.Range("B10").Text) 'Kostenstelle


Dabei wird der entsprechende fall aber komplett ignoriert und nur der case else genommen.
passen vieleicht die datentypen nicht zusammen?
liebe grüße

Anzeige
AW: Mehrere Dateien in eine Tabelle zusammenfassen
15.09.2008 09:48:00
fcs
Hallo Marco,
die Select Case-Anweisung muss du etwas anders aufbauen, wenn du abhängig vom Quell-Dateinamen den Firmennamen festlegen willst.
Bitte achte bei den Dateinamen auf korrekte Groß-/Klenschreibung in den Case-Zeilen!
Oder verwende in der Select-Case-Anweisung zusätzlich die Funktion LCase oder UCase.
Gruß
Franz

wksZiel.Cells(ZeileDaten, 2) = wbQuelle.Name 'Name Quelldatei
Select Case wbQuelle.Name
Case "49155.xls"
Firmenname = "Fabrik A"
Case Else
Firmenname = "test"
End Select
wksZiel.Cells(ZeileDaten, 1) = Firmenname  'Firmenname
wksZiel.Cells(ZeileDaten, 3) = fncABC_P(.Range("B9").Text) 'Beschreibungstext
wksZiel.Cells(ZeileDaten, 4) = fncKST(.Range("B10").Text) 'Kostenstelle
'oder
wksZiel.Cells(ZeileDaten, 2) = wbQuelle.Name 'Name Quelldatei
Select Case LCase(wbQuelle.Name) 'Dateiname in Kleinschreibung
Case "49155.xls"
Firmenname = "Fabrik A"
Case Else
Firmenname = "test"
End Select
wksZiel.Cells(ZeileDaten, 1) = Firmenname  'Firmenname
wksZiel.Cells(ZeileDaten, 3) = fncABC_P(.Range("B9").Text) 'Beschreibungstext
wksZiel.Cells(ZeileDaten, 4) = fncKST(.Range("B10").Text) 'Kostenstelle


Anzeige
AW: Mehrere Dateien in eine Tabelle zusammenfassen
15.09.2008 10:26:14
Reptil
Super, perfekt : )
vielen Dank noch mal

Forumthreads zu verwandten Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
Eingabe formatiert zurückgeben (Komma und Punkt)
Lemmi

Hallo zusammen,
ich möchte Euch eine wahrscheinlich einfache Frage stellen, die ich mir gerade mal nicht beantworten kann!
Wie stelle ich sicher das auch wenn ein Punkt als Trennzeichen eingegeben worden ist, am Ende immer ein Komma in der Zelle steht?
Eingabe 10,0........Ausgabe...
07.08.2008 21:35:00
Thread-ID: 1000105
5 Beiträge
Anzeige
Farbige Zellen suchen und Zuordnung auflisten
Excel-Opfer

Hallo zusammen,
ich hab nicht so die Ahnung von Makros und Automationen im Excel, bräuchte allerdings "dringend" eine Vereinfachung meines Excelchaos.
es dreht sich um folgende Problematik:
ich muss diverse Dienstpläne in unsere Personalplanung einarbeiten, leider liefert eine Abtei...
08.08.2008 06:47:00
Thread-ID: 1000143
16 Beiträge
Anzeige
Wenn-Formel und Drop-down Menü
Tommy

Hallo,
ich habe ein Problem.
Ich möchte immer dann, wenn ich einen Wert im Drop-down Menü auswähle, dass eine bestimmte Zelle gelöscht wird. Ein vereinfachtes Beispiel seht Ihr im Anhang.
https://www.herber.de/bbs/user/54449.xls
Danke & Gruss
Tommy
08.08.2008 14:41:00
Thread-ID: 1000304
3 Beiträge
Wert aus Combobox zurückgeben in Textboxen
Peter

Hallo wertes Form
bin kurz vor der Vollende meinesWerkes
benötige aber noch die Hife aus dem Forum
Ich habe eine Combox19, die beim öffnen die 5000-26000 in 100 Steps an zeigt
Wenn ich den wert 0 bis 6999 eingebe soll in einer Textbox27 der wert 130 ausgegeben werden.
ab dem...
10.08.2008 20:06:00
Thread-ID: 1000671
7 Beiträge
Anzeige
Makro ohne Pfadbezug erstellen.
George

Hallo,
Ich würde gerne eine Analysefunktion mit immer gleichem Zellenbereich in verschiedenen Dateien (immer gleicher Aufbau) per Makro ausführen. Wenn ich eine neue Datei öffne, will sich das böse Makro immer auf den Pfad der Datei beziehen, mit der das Makro erstmalig erstellt wurde. Ande...
11.08.2008 08:46:50
Thread-ID: 1000712
3 Beiträge
Anzeige
Monat eingeben und dann
Kurt

Guten Morgen Zusammen,
ich möchte gern in der Zelle "C1" eine Zahl eingeben, z.b. 8, dann soll
in der Zelle C2 der Monat erscheinen u. zwar das ENDE 8 = 31.08.2008,
geht das ?
mfg Kurt
11.08.2008 09:53:00
Thread-ID: 1000728
6 Beiträge
Verketten von Text und Datumswerten
Text

Hallo!
Ich möchte eine eindeutige ID erstellen lassen und dazu eine vierstellige Zahlenfolge mit dem Datum / der Uhrzeit verketten.
Etwa so: =verketten(B2;" ";jetzt())
in B2 steht eine vierstellige Zahlenfolge z.B. 1234 Als Datumswert nutze ich TT.MM.JJJJ hh:mm.
Leider wird das...
11.08.2008 12:30:00
Thread-ID: 1000804
4 Beiträge
CommondButton Namen zuweisen
Frank

Hallo Ihr lieben Excelfreunde!!!
Kurze Frage: in einer Tabelle befinden sich einige Steuerelemente - CommandButton's", diesen würde ich gern definierte Namen zuweisen. Beispiel: CommandButton1 soll mit dem Inhalt der Zelle AP1 beschriftet sein, CommandButton 2 mit dem Inhalt der Zelle AP2 u...
11.08.2008 13:10:00
Thread-ID: 1000824
4 Beiträge
3 Zellen zu 1ner 3-Zeiligen (wieAlt+Enter) machen
Horst_H

Hallo!
Meine Frage: In Spalte C steht eine Straßenbezeichnung, in Spalte H ein Kommentar und in Spalte I ein zweiter Kommentar. Nun möchte ich per VBA (weil ich viele Mappen unterschiedl. Länge und unterschiedlicher Stadtteile habe) erreichen, dass zusätzlich in die jeweilige Zelle in Spal...
11.08.2008 16:07:27
Thread-ID: 1000899
10 Beiträge
Excel mit DropDown Menü und Aktualisierung
ML

Hallo,
beschäftige mich nochnet lange mit Excel und habe folgende Frage:
Ich will mir auf einem Tabellenblatt auf dem ich mehrere Produkte aufgelistet habe untereinander, in der Zelle oben wo Artikelnummer steht, mir ein DropDown-Menü erstellen, in dem alle Artikelnummern aufgelistet si...
11.08.2008 17:17:00
Thread-ID: 1000925
5 Beiträge
Kombinationen mit Zurücklegen ohne Reihenfolge
Christian

Hallo zusammen,
ich suche eine VBA Lösung für folgende Aufgabe:
Gezogen werden "k" Kugeln aus einer Los-Trommel. Die Trommel enthält "n" Kugeln. Die gezogenen Kugeln werden anschließend zurückgelegt. Gesucht sind die möglichen Kombinationen der Ziehungen. Dabei kommt es nicht auf die Re...
11.08.2008 22:53:00
Thread-ID: 1001022
10 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