Live-Forum - Die aktuellen Beiträge
Datum
Titel
08.10.2025 12:36:22
Hinweis für Word auf dem MAC
08.10.2025 12:35:32
Datumsabhängige Einträge in Zellen. Bedingter Formatierung.
08.10.2025 11:44:01
Faktor Uhrzeit hinzu fügen
08.10.2025 06:24:29
VBA - Zeichenkette von rechts kürzen
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
1844to1848
1844to1848
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Bereich aus anderer Tabelle in Array

Forumthread: VBA Bereich aus anderer Tabelle in Array

VBA Bereich aus anderer Tabelle in Array
03.09.2021 16:00:31
W
Hallo Excel-Freunde.
Wie kann ich einen Bereich aus einem anderen Tabellenblatt in einen 2D-Array bringen?
So geht es jedenfalls nicht:
Groups = ActiveWorkbook.Sheets(ZBlatt).Range(Cells(3, 2), Cells(MaxRows, 3))
Wenn das entsprechende Blatt das aktive Blatt ist, dann gibt es kein Problem.
Wer kann helfen?
Gruß Werner
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Bereich aus anderer Tabelle in Array
03.09.2021 16:04:15
peterk
Hallo
Auch die Zellen müssen ein Bezug auf das Blatt haben

With ActiveWorkbook.Sheets(ZBlatt)
Groups = .Range(.Cells(3, 2), .Cells(MaxRows, 3))
end With

AW: VBA Bereich aus anderer Tabelle in Array
03.09.2021 16:35:46
W
Hallo peterk.
Danke für Deinen Vorschlag. Aber das Ergebnis ist ebenfalls ein Laufzeitfehler 1004.
Der Laufzeitfehler 1004 kommt auch, wenn das genannte Blatt das aktive Blatt ist. Dein Vorschlag muss also einen Fehler enthalten, Nur welchen?
Gruß Werner
Anzeige
AW: VBA Bereich aus anderer Tabelle in Array
03.09.2021 17:00:05
Daniel
HI
das "ActiveWorkbook.Sheets(ZBlatt)." muss auch vor den beiden CELLS stehen!
gundsätzlich gilt, dass alle Zellbezüge (Range, Cells, Columns, Rows), ohne die Tabellenblattangabe davor immer auf das aktive Blatt referenzieren*
der Fehler kommt, wenn die Range auf einem anderen Blatt liegen soll, als die Cells, die die Range definieren.
dh korrekt wäre:

Groups = ActiveWorkbook.Sheets(ZBlatt).Range(ActiveWorkbook.Sheets(ZBlatt).Cells(3, 2), ActiveWorkbook.Sheets(ZBlatt).Cells(MaxRows, 3))
da das umständlich ist, definert man den Zellbereich besser so, mit hilfe von Resize.

Groups = ActiveWorkbook.Sheets(ZBlatt).Cells(3, 2).Resize(MaxRows - 3 + 1, 2).Value
Gruß Daniel
* dies gilt für Code in einem allgemeinen Modul.
Befindet sich der Code in einem Tabellenblattmodul, so referenzieren Zellbezüge ohne Tabellenblattangabe davor auf das Tabellenblatt des Moduls.
Anzeige
AW: VBA Bereich aus anderer Tabelle in Array
03.09.2021 17:12:29
W
Hallo Daniel,
vielen Dank für Deinen Code mit Resize.
Mein Dank gilt allerdings auch peterk. Nicht er hat einen Fehler gemacht, sondern ich hatte den Code ncht richtig übernommen. In der Variablen MaxRows war der Wert 0 enthalten.
Kaum macht man es richtig, dann funktioniert es.
Also nochmals: beide Lösungen funktionieren. Vielen Dank.
Gruß Werner
Anzeige
;

Forumthreads zu verwandten Themen

Array in Tabelle schreiben
eres

Schönen Gruß in mein Lieblings-Forum,
ich lese sequentiell aus einer riesigen csv-Datei die ersten 50.000 Sätze in ein Array. Nach dem Einlesen möchte ich die Werte in ein sheet schreiben.
Dim HilfsArray(1 To 50000) As String
Dim i as long
Open Input_File For Input As #1
D...
08.04.2009 14:15:07
Thread-ID: 1067735
5 Beiträge
array to range, range to array
Andi

Hallo,
Opa Helmut auf dem Fahrrad:
For i = 1 To UBound(arr)
Cells(1, i) = arr(i)
Next 'i
Raumschiff Enterprise
Range(Cells(1, 1), Cells(1, UBound(arr))) = arr
Ich favorisiere die Methode Raumschiff Enterprise, aber wenn ein arr Speicherplatz mit 1000 Zeichen belegt...
21.12.2010 18:50:18
Thread-ID: 1192391
12 Beiträge
Werte in Array schreiben: Ich brauche Hilfe
Holger,

Guten Morgen liebes Forum,
heute steht mal wieder das unleidige Thema Array an meiner Tagesordnung.
Stück für Stück nähere ich mich an. In diesem Fall schleife ich durch einen Rangebereich.
Hierbei prüfe ich ob der Zellwert unter dem aktuellen unterschiedlich ist oder nicht.
Sin...
16.02.2011 10:28:56
Thread-ID: 1201093
18 Beiträge
VBA, Werte anhand Koordinaten in Tabelle schreiben
Christian

Hallo, ich hab ein kleines Problemchen welches ich gerne mittels VBA lösen möchte. Leider komme ich auch nach einiger Suche nicht mal ansatzweise auf eine Lösung.
Das ganze sieht so aus:
Ich habe 2 Tabellen:
Tabelle 1 hat 3 Spalten z.b. so:
Pos | Blatt | Wert
1 | 1...
01.09.2011 19:10:08
Thread-ID: 1228358
3 Beiträge
Anzeige
Per VBA Werte in eine Datei schreiben
Tobias

Hallo Leute,
ich möchte für den Brötchenverkauf in der Schule eine Statistik erstelle.
Jeden Tag soll , bei klicken des Bottons, aus der Excel Tabelle, die Anzahl, die Produktnummer, der Preis und die Kategorie in die Tabelle "Daten" geschrieben werden.
Mit folgendem Makro ist es...
09.02.2014 16:58:33
Thread-ID: 1348795
5 Beiträge
Array mit If-Anweisung
Moritz

Hallo alle zusammen,
ich beschäftige mich seit ein paar Tagen mit VBA. Ich habe momentan eine Arbeitsmappe die ich dafür gebrauche um eine Liste auszulesen und bestimmte daten dann immer wieder neu erstellten Worksheets zuzuweisen.
als erstes habe ich es ganz statisch nur mit einem work...
29.10.2014 10:23:53
Thread-ID: 1389301
4 Beiträge
Anzeige
VBA Kommentar aus Bereich einer Tabelle schreiben
Timonski

Hallo,
ich will von einem anderen Tabellenblatt, einen bestimmten Bereich z.B. A1:C20 in eine bestimmte Zelle (hier A1) als Kommentar reinschreiben...
hab auch schon mal was gefunden und was geändert, aber der Bereich bekomm ich nicht hin :-)
Sub MyComment() Dim myCom As Comment Dim...
11.03.2015 16:29:49
Thread-ID: 1414373
11 Beiträge
VBA - Werte in Zellen in eine Zelle schreiben
Josef

Hallo allerseits,
ich habe eine Beispieldatei erstellt, um meine Absicht verständlich zu machen.
https://www.herber.de/bbs/user/100813.xlsx
Ich möchte die Inhalte von mehreren, untereinanderliegenden Zellen (B3:B50) in eine Zelle (E2) schreiben lassen, getrennt durch ein |. Ich den...
15.10.2015 16:04:24
Thread-ID: 1452506
4 Beiträge
VBA - Code in Tabellenblatt schreiben
R4h4

Hallo alle Zusammen,
Das Ziel:
Formeln in ein Tabellenblatt schreiben und diese per VBA auslesen und anwenden
Hintergrund:
aktuell arbeite ich an einer Automatischen Rechnungsüberprüfung für viele verschiedene Posten mit Staffelpreisen via VBA.
Die Berechnung variiert dabei...
19.11.2015 12:37:01
Thread-ID: 1459436
2 Beiträge
VBA: Durchschnitt der x-größten Werte eines Arrays
Martin

Hallo,
gibt es eine einfache Möglichkeit den Durchschnitt der x-größten Werte eines Arrays zu ermitteln als VBA-Lösung? Als Formel geht es recht einfach:
http://chandoo.org/wp/2010/06/04/average-of-top-5-values
Ich habe eine Function mit einer Schleife geschrieben, aber vielleicht d...
25.11.2015 12:32:03
Thread-ID: 1460616
10 Beiträge
VBA Formeln in anderes Tabellenblatt schreiben und
Gesa

Hallo zusammen!
Ich benötige mal wieder euer Rudelwissen.
Ich habe eine Datei, in der in Tabelleblatt "Pivot" in den Feldern I4 bis N Zahlen per Formel rauskommen. Nun möchte ich diese Ergebnisse gerne in das Tabellenblatt "Ergebnis S. 1" ab B22 bis G kopieren. Allerdings nur, wenn in d...
21.08.2018 15:06:57
Thread-ID: 1640779
2 Beiträge
Array in Tabelle schreiben ... neues Problem :-(
Peter

Hallo zusammen,
gestern habt Ihr mir hier toll bei meiner Herausforderung zum Thema "Ein Array mit einem Schwung in eine Tabelle schreiben" geholfen.
Und grundsätzlich funktioniert das auch wunderbar.
Halt nur grundsätzlich :-(
Ich habe ein Array mit ca. 100.000 Elementen.
D...
19.09.2018 10:21:36
Thread-ID: 1646388
7 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