Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1656to1660
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
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Public Array definieren mit variabler Anzahl

Public Array definieren mit variabler Anzahl
18.11.2018 01:53:57
Jonathan
Hallo zusammen,
ich habe ein Problem:
ein als public definiertes Array besitzt eine von einer Tabelle abhängige Anzahl von Einträgen. Nun kann ich eine Variable mit der Anzahl der Zeilen nur in einer Sub erstellen, nicht aber "ganz oben" im Code (wie heißt der Bereich eigentlich?).
Lese ich das Array neu ein und versuche, es vorher mit 

ArrZeilen = Sheets("Bestellungen").Range("bestellungen").Rows.Count
ReDim Preserve Arr(ArrZeilen, 47)

neu zu dimensionieren, erhalte ich die Fehlermeldung, dass das Array bereits dimensioniert wurde...
Wie kann ich die Anzahl der Einträge nun variabel gestalten?
Danke an Euch

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Public Array definieren mit variabler Anzahl
18.11.2018 03:50:52
Gerd
Moin :-)
Mit Redim Preserve kann man nur die letzte(rechte) Dimension eines Array ändern.
Deklariere dieses auf der Modulebene z.B. Public Arr As Variant
Die erste Dimensionierung erfolgt in einer Prozedur bspw. mit
Redim Arr(0 To 47, 0 To 9)
Gruß Gerd
AW: Public Array definieren mit variabler Anzahl
18.11.2018 18:13:30
Jonathan
Hi Gerd, danke für deine Hilfe - leider erhalte ich auf diesem Wege beim ersten Einlesen des Arrays eine Fehlermeldung "Index außerhalb des gültigen Bereichs"...
Public Arr as Variant
Sub einlesen
Dim iCounter, iRows, i As Integer
Dim rng As Range
Dim strFirst As String
Set Bereich = Sheets("Bestellungen").Range("bestellungen")
iRows = Bereich.Rows.Count
Erase Arr
For iCounter = 2 To iRows + 1
With Sheets("Bestellungen")
For i = 1 To 16
Arr(iCounter - 1, i) = .Cells(iCounter, i).Value
Next i
End With
next iCounter
End Sub

Anzeige
AW: Public Array definieren mit variabler Anzahl
19.11.2018 09:21:57
Daniel
Hi
du musst das Variant-Array arr schon noch dimensioneren, bevor du es verwendest:
Public Arr as Variant
Sub einlesen
Dim iCounter, iRows, i As Integer
Dim rng As Range
Dim strFirst As String
Set Bereich = Sheets("Bestellungen").Range("bestellungen")
iRows = Bereich.Rows.Count
Redim Arr(1 to iRows, 1 to 16)
For iCounter = 2 To iRows + 1
With Sheets("Bestellungen")
For i = 1 To 16
Arr(iCounter - 1, i) = .Cells(iCounter, i).Value
Next i
End With
next iCounter
End Sub
wobei in deinem Fall sowohl die Redimensionerung als auch die Schleife unnötig sind, da man in VBA einen Zellbereich direkt einer Variantvariable zuweisen kann und VBA dann automatisch die Dimensionierung als 2-D-Array mit der Basis 1 (erster Index = 1) vornimmt:
Public arr as Variant
Sub einlesen
Dim iCounter, iRows, i As Integer
Set Bereich = Sheets("Bestellungen").Range("bestellungen")
iRows = Bereich.Rows.Count
Arr = Sheets("Bestellungen").Cells(2, 1).resize(iRows, 16).Value
End Sub

Anzeige

13 Forumthreads zu ähnlichen Themen

[VBA] Dreidimensionales Array in Tabellen ausgeben
Thomas

Hallo,
ich habe ein Problem mit der Ausgabe eines Arrays in eine Excel-Tabelle.
Ausgangspunkt ist folgender: With ThisWorkbook.Worksheets(1) .Cells(4, l).Resize(UBound(array, 1), UBound(array, 2)).Value = array End With
Das Array 'array' ist hierin zweidimensional, l wird durch...
06.10.2009 10:25:00
Thread-ID: 1107423
5 Beiträge
Anzeige
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
Anzeige
VBA - Länge der Inhalte eines Array ermitteln
Christian

Hallo zusammen,
ich stehe vor einem mir, momentan, unlösbaren Problem. Google hat mir bisher auch nicht weiterhelfen können.
Ich habe eine Userform mit einer TextBox, in der Eingaben gemacht werden (Barcodes scannen). Nun werden die einzelnen Eingaben per Split-Funktion getrennt und in...
10.05.2018 14:27:49
Thread-ID: 1623572
4 Beiträge
vba oder array erstellen um alle zugänge errechnen
BB

Hiich möchte in vba ein array erzeugen welches einen eingegebenen inhalt speichert und einen neuen eingegeben wert hinzuaddiert.wer kann mir dabei helfen?der erste wert berechnet sich aus "zugang"+"jahresbestand"
ich möchte damit ALLE meine zugänge errechnen. alle zugänge=zugang+jahresbestan...
02.10.2002 13:18:20
Thread-ID: 165612
5 Beiträge
VBA Excel, Array anlegen
Roman

Hallo, mich beschäftigt seit kurzem folgendes Problem: Ich möchte einen Lottozahlengenerator programmieren, jedoch als Array nicht immer nur einen Zahlenbereich von bis angeben, sondern verschiedene bunt zusammengewürfelte Zahlen verwenden. Auch nach der Lektüre eines VBA Buches wurde ich nicht...
21.03.2019 19:34:39
Thread-ID: 1682648
8 Beiträge
erstellen eines Arrays in VBA WORD
christian

Hallo Experten,

Wie kann ich in einem Makro das ich in Word erstellt habe ein Array erstellen??
Vielleicht könnt ihr mir weiterhelfen!!
Vielen Dank im Voraus!!

Gruß
christian
05.08.2003 12:39:27
Thread-ID: 289909
3 Beiträge
VBA: zweidimensionale Variablen (Array)
Dirk

Hallo,
ich verzweifle gerade an einem (eher leichten) VBA-Problem:
irgendwas stimmt an der unteren Schleife nicht(relevanter Code-Ausschnitt); VBA kompiliert zwar, aber die Berechnung im Excel-Sheet funktioniert nicht: #WERT!)
Ich erläre kurz, was ich mit dieser Schleife bezwecken w...
02.12.2007 10:13:28
Thread-ID: 931397
10 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
4
5
3
8
4
3
4
7
2
9
2
3
9