Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1820to1824
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1820to1824
1820to1824
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten zusammenfassen aus mehreren Blätte

Daten zusammenfassen aus mehreren Blätte
26.03.2021 09:13:17
Marc
Hallo zusammen,
ich hoffe man kann mir helfen. leider sind meine VBA Kenntnisse eingerostet ...
Folgendes Problem:
Ich möchte aus einer "master" Datei raus einen Befehl anstoßen, der mir in seinem Ordner alle Dateien ohne Makros Öffnet und bestimmte Werte in die Master Datei an bestimmte Stellen kopiert.
Beispiel
A6 master = normale Exceldatei B8
B6 master = normale Exceldatei K8
C6 master = normale Exceldatei G40
Danach soll die nächste xlsx datei geöffnet werden und die daten in Zeile 7 geschrieben werden.
A7 master = normale Exceldatei B8
B7 master = normale Exceldatei K8
C7 master = normale Exceldatei G40
und so weiter. Bis alle xlsx Dateien im Ordner einmal durchsucht worden sind.
Ich stehe echt aufm Schlauch =(

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten zusammenfassen aus mehreren Blätte
26.03.2021 09:55:15
Rudi
Hallo,
teste mal: 
Sub sammeln()
Dim strPfad As String, strDatei As String
Dim wkbQ As Workbook, wksZ As Worksheet
Dim lngRow As Long
Dim vntARR
With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
.EnableEvents = False
End With
lngRow = 6
strPfad = ActiveWorkbook.Path & "\"
strDatei = Dir(strPfad & "*.xlsx")
Set wksZ = ActiveSheet
Do While strDatei  ""
Set wkbQ = Workbooks.Open(strPfad & strDatei)
With wkbQ.Sheets(1)
vntARR = Array(.Cells(8, 2), .Cells(8, 11), .Cells(40, 7))
End With
wksZ.Cells(lngRow, 1).Resize(, 3) = vntARR
wkbQ.Close False
lngRow = lngRow + 1
strDatei = Dir
Loop
With Application
.ScreenUpdating = True
.Calculation = xlCalculationAutomatic
.EnableEvents = True
End With
End Sub

Gruß
Rudi

Anzeige
AW: Daten zusammenfassen aus mehreren Blätte
26.03.2021 10:06:10
Marc
Hallo Rudi,
vielen dank es funktioniert perfekt. ich hoffe das ich so langsam wieder rein komme und in Zukunft in diesem Forum auch was zurück geben kann.
Vielen dank und bleib gesund =)

268 Forumthreads zu ähnlichen Themen

Daten aus Tabellenblatt kopieren
Jochen

Hi,
ich kopiere daten von einem Tabellenblatt in ein anderes:
Sub Übersicht() Dim intS As Integer 'letzte belegte Spalte auf Blatt 1 Sheets("Daten").Columns("C:H").Copy With Sheets("Übersicht") intS = .Cells(1, Columns.Count).End(xlToLeft).Column .Cells(1, intS).PasteSpecial Paste:=xl...
08.08.2008 22:24:43
Thread-ID: 1000422
2 Beiträge
Anzeige
Datensätze aus Blatt auslesen
bully

Hallo Leute,
ich möchte mit VBA aus dem Blatt2 ganze Datenzeilen auslesen, wenn diese in der Spalte3 den Wert enthalten, den ich in Blatt3 in Zelle F6 vorgebe. Die Datenzeilen sollen dann in Blatt3 ab Zeile14 eingefügt werden.
Nach etlichen Selbstversuchen gebe ich jetzt auf.
Gruss...
02.09.2008 15:55:27
Thread-ID: 1006842
6 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
Anzeige
Gültigkeit (Liste): Daten von anderem Blatt?
anderem

Moin,
ich wollte gerne per Makro Gültigkeiten auf einem Blatt eintragen. Und zwar sollen es Listenfelder werden. Nur derzeit ist das Problem, dass die Daten für die Gültigkeitslisten auf einem anderen Blatt liegen und ich sie nicht übertragen kann. Das läßt mein Excel (2000) nicht zu.
04.03.2009 21:16:21
Thread-ID: 1056583
2 Beiträge
Listenkriterien aus anderem Blatt
Philipp

Hallo liebe Herber-Gemeinde,
ich möchte für meine Dropdown-Auswahlliste die Kriterien aus einem anderen Tabellenblatt verwenden.
Unter [Daten] - [Gültigkeit] - [Zulassen] - [Liste] steht allerdings, dass die Kriterien in der selben Tabelle abegelegt sein müssen.
Geht das auch ander...
14.04.2009 10:12:55
Thread-ID: 1068538
18 Beiträge
Daten aus Tabellenblatt einlesen - ohne ADO record
Gonzer

Hallo zusammen,
ich habe folgendes Problem. Mit lieber 2 Tabellen in der gleichen Arbeitsmappe vor. Eine unformatierte Tabelle "Quelle" und eine leere mit Überschriften versehene Tabelle "einlesen".
In der Tabelle "einlesen" finden sich Überschriften wieder welche auch in der Tabelle "...
19.04.2009 10:59:37
Thread-ID: 1069584
3 Beiträge
Texte aus anderem Tabellenblatt kopieren
Stefan

Hallo zusammen,
in einer Tabelle habe ich mir im Tabellenblatt 'Umwandeln' für verschiedene Textmanipulationen Formeln eingerichtet. Die Texte, die verändert werden sollen (Artikelbezeichungen) bekomme ich in Form einer Exceltabelle und ich ziehe mir das Tabellenblatt 'Artikel' als neues Ta...
22.04.2009 23:35:00
Thread-ID: 1070529
3 Beiträge
Formel komplett aus anderem Blatt übernehmen
martin

Hallo.
In verschiedenen Arbeitsbättern befinden sich exakt die selben Rechnungen, jeweils mit unterschiedlichen Werten.
In einem Master-Blatt möchte ich gerne die Zeilen und Spaltenbeschriftungen, sowie die zu verwenden formeln definieren.
Könnt Ihr mir Tipps geben, wo ich dazu was...
18.06.2009 14:56:18
Thread-ID: 1082618
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
5
10
9
1
17
2
2
1
4
3
3
6
1
2
6
1
6
10
4
1
3
6
3