Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
860to864
860to864
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Array Redim Preserve

Forumthread: Array Redim Preserve

Array Redim Preserve
14.04.2007 16:55:24
Piet

Hi zusammen,
bei Arrays kann man ja nur die letzte Dimension mit Redim Preserve vergrößern, ohne dass
die Werte im Array verloren gehen.
Gibt es dennoch einen Trick, wie man z.B. zwei Dimensionen vergrößern kann?
Die Dimensionen ergeben sich erst zur Laufzeit des Codes.
Grüße Piet

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Array Redim Preserve
14.04.2007 17:15:24
Gerd L
Hallo Piet,
erst mit Redim größer(zu groß) dimensionieren, hinterher passend mit Redim Preserve verkleinern.
Gruß
Gerd

AW: Array Redim Preserve
14.04.2007 17:19:28
Piet
Hi,
ich weiß nicht, wie das gehen sollte?
Hast du mal ein Beispiel parat?
Grüße Piet

AW: Array Redim Preserve
14.04.2007 21:48:26
Kurt
Hi,
du könntest das Array in ein anderes "umschaufeln", ist aber nicht ganz trivial, wenn es wasserdicht
sein soll.
Vielleicht kannst du erst die Dimensionen ermitteln und dann dimensionieren?
mfg Kurt

Anzeige
AW: Array Redim Preserve
15.04.2007 00:31:47
Gerd L 


Sub test()
Dim varMatrix() As Variant
Dim i as long, j as long
i = 5
j = 10
ReDim varMatrix(i, j)
varMatrix(0, 0) = 11
varMatrix(1, 0) = 21
varMatrix(0, 1) = 12
varMatrix(1, 1) = 22
varMatrix(0, 2) = 31
varMatrix(1, 2) = 32
j = 2
ReDim Preserve varMatrix(i, j)
For i = LBound(varMatrix, 1) To UBound(varMatrix, 1)
For j = LBound(varMatrix, 2) To UBound(varMatrix, 2)
Debug.Print varMatrix(i, j)
If varMatrix(i, j) = Empty Then Exit For
Next
Next
End Sub


Gruß Gerd

Anzeige
;

Forumthreads zu verwandten Themen

vba-Datenexport nach Excel2007 -Array mit 70000 DS
Tim

Hallo,
ich habe einen Datenexport aus einem Programm nach Excel in vba. Das ganze funktioniert soweit ganz gut.
Nun möchte ich jedoch nicht, das sjede Zeile aus meinem Programm exportiert wird, daher gibt es ein Array mit entsprechenden Datensätzen: Entweder eine 1 (steht für Export der...
20.08.2008 08:57:00
Thread-ID: 1003084
2 Beiträge
VBA FormulaArray nur 256 Zeichen
Werner

Hallo Zusammen,
ich möchte Formeln einer ziemlich umfangreichen Jahresarbeitsplanung in Excel, per VBA-Code korrigieren, da diese Datei(en) x-mal vervielfältigt und "beplant" sind. (über 100 Dateien mit mittlerweile über 28.000 Formeln je Datei)
Bei einer bestimmten Matrixformelgröße, ü...
25.10.2008 21:25:22
Thread-ID: 1019276
9 Beiträge
Probleme bei Sortierung von 2-dimensionalem Array
2-dimensionalem

Hallo,
ich habe leider ein Problem bei der Sortierung eines 2-dimensionalen Arrays. Die Daten an das Array werden von einer Listbox übergeben. Ich erhalte immer die Fehlermeldung "Fehler beim Kompilieren: Unverträglicher Typ: Datenfeld oder benutzerdefinierter Typ erwartet". Der Text "Arr"...
23.07.2009 14:43:19
Thread-ID: 1090821
2 Beiträge
2-dimensionales Array: Doppelte "Zeilen" löschen
Martin

Hallo,
ich lese aus dem Internet etwa 7650 Zeilen mit 13 Spalten in ein Array in Excel ein, was auch sehr gut klappt. Leider kommen einige Zeilen doppelt vor, die ich daher gerne aus dem Array löschen würde. Kennt von Euch jemand eine Function, die alle doppelten Zeilen eines 2-dimensionale...
20.11.2010 15:23:58
Thread-ID: 1187936
10 Beiträge
2-dimensionales Array Sortieralgorithmus
Andi

Hallo,
zuvor habe ich Daten auf einem Excelsheet sortiert.
Jetzt soll aber das ganze auf ein Formular / Tabelle. Auf dem Formular habe ich das Steuerelement "Spreadsheet" von Microsoft eingefügt.
Wie bekomme ich meine Daten sortiert? Muß mehrere Felder sortieren, Nummer aufsteigen...
02.11.2011 17:09:28
Thread-ID: 1236340
2 Beiträge
2 Dimensionales Array transponieren
Nike

Hi,
ich hab da ein Array mit den Dimensionen (9, lngZeil)
der Teil lngZeil ist Variabel
nun möchte ich dieses Array in eine Listbox einlesen,
Me.ComboBox1.List() = arrList
dummerweise muß ich dafür aber den Inhalt zuerst transponieren
um die Darstellung in der Listbox korrekt...
03.07.2002 00:34:04
Thread-ID: 133236
5 Beiträge
Worksheets in dreidimensionales Array einlesen VBA
Jane

Hallo,
ich bin hier noch neu und auch noch nicht so geuebt in VBA.
Vielleicht stehe ich nur auf der Leitung, aber ich wuerde eigentlich gerne nur wissen, wie ich schnellstmoeglich ein ganzes Worksheet in ein dreidimensionales Array einlesen lassen kann ohne jede einzelne Zelle aufrufen...
20.03.2014 04:42:35
Thread-ID: 1354132
6 Beiträge
Effizienter VBA Code / Multidimensionale Arrays
Moritz

Hallo,
ich stehe vor folgendem Problem, bei dem ein Excel-Sheet (B) von einem anderen Excel-Sheet (A) aus auf korrekten Inhalt geprüft werden soll. Zur Effizienz habe ich folgende Frage, was die elegantere Programmierung ist:
FRAGE 1:
Excel-Sheet (B) enthält zahlreiche Spalten, die...
21.05.2015 11:29:50
Thread-ID: 1427091
4 Beiträge
VBA Arraygröße dynmaisch erweitern ReDim
Krycho89

Hallo Forumsmitglieder,
ich habe ein Problem mit der dynamischen Erweiterung von einem Array
Mein Code sieht dabei folgendermaßen aus:
Sub Search()
Dim Suchbegriffe()
Dim newDim as Long
newDim = UBound(Suchbegriffe,1) + 1
ReDim Suchbegriffe(1 To newDim)
Suchbegr...
25.06.2015 08:05:28
Thread-ID: 1432965
9 Beiträge
ReDim Preserve eines transponierten 2D Arrays
tengal

Moin!
Die Ausgangssituation auf die Schnelle: ein dynamisches Array(n,m) soll in einer Schleife seine Länge, bzw. die Anzahl Zeilen ändern, die Werte müssen aber bebehalten werden.
Ein Fall für ReDim Preserve, da man hier nicht die Zeilen- sondern nur die Spaltenzahl ändern kann (nur z...
12.04.2016 00:22:07
Thread-ID: 1487428
14 Beiträge
2 Dimensionales Array
Bastian

Halli Hallo
Da ich heute wohl etwas durch einander bin frag ich mal nach =)
Wie bekomme ich aus der rng ein 2D array
Rng = WorksheetFunction.Transpose(Range("A1:A3,C1:D3").Value)
Gruß Basti
16.10.2016 16:42:45
Thread-ID: 1519919
20 Beiträge
[VBA] Array1, Array2,... mit variable im Namen
Nils

Hallo zusammen,
ich habe 16 Arrays mit den Namen:
Stand1, Stand2, Stand3, ... , Stand16
Für jedes Array habe ich eine Schleife:
If Not IsEmpty(Stand1) Then If UBound(Stand1) = 0 Then Cells(Stand1(i), "L") = "Nutzlos" Else For i = 0 To UBound(Stand1) - 1 If Cells(Stand1(i), "C")...
31.01.2017 21:55:05
Thread-ID: 1538612
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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