Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1712to1716
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
1712to1716
1712to1716
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Vba: Array dynamisch dimensionieren und einfügen

Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 16:50:40
Christian
Grüßt euch,
Ich habe noch einige Verständnisprobleme bei der Funktion .rezise.
Ich möchte einen mit Daten befüllten Array, in mein Tabellenblatt einfügen.
Da der Array seine Größe dynamisch ändert, muss sich dementsprechend auch der Ausgabebereich vergrößern.
Der Code funktioniert soweit auch, ich muss nur bisher immer händisch die letzte Zahl im . rezise Befehl anpassen.

Renditen.Range(Renditen.Cells(6, (letzteSpaltestartNeu + 2)), Renditen.Cells(UBound(X, 1), (letzteSpaltestartNeu + 2))).Resize(UBound(X, 1), 3) = X
bisher habe ich die Spalte (im obigen Beispielcode, die 3 am Ende) händisch angepasst. Dies soll aber dynamisch passieren.
die Zeilengröße passt sich ja über die Ubound funktion dynamisch an.
Wie mach ich das nun mit der Spaltengröße?
Vielen Dank für eure Hilfe.
Grüße
Christian.

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:02:42
Daniel
Hi
schau mal nach, was Ubound(..., 1) bedeutet.
wenns ein 1 gibt, gibt's vermutlich auch einen anderen Wert, den man hier einsetzen könnte, in der Regel den benachbarten Wert 0 oder 2.
überlege mal, was es in einem 2-dimensionalen Array alles gibt und wofür dann dieser andere Wert in der UBound-Funktion stehen könnte.
und wie gesagt, du arbeitest mit 2-dimensionalen Arrays.
und noch ein Tipp: wenn du sowieso die Größe des Zellbereichs mit Resize bestimmst, dann reicht die Angabe der linken oberen Eckzelle aus, weil das .Resize die Größe der Range "überspielt"
Gruß Daniel
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:19:02
onur
" in der Regel den benachbarten Wert 0 " - bist du sicher ?
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:33:24
Daniel
omg. ist ja nur ein Beispiel, um zum selbst ausprobieren und Experimentieren anzuregen.
da darf man auch mal testen, was passiert wenn man einen unpassenden Wert vorgibt.
Gibt ja auch die Variante WAHR und FALSCH, die dann 1 und 0 sind, wenn man wegen der kürzeren Schreibweise mit Zahlenwerten arbeitet.
und 0 ist von 1 genauso ein Nachbar wie 2, nur halt nicht rechts, sondern links.
so what.
Gruß Daniel
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:38:54
Christian
Hi onur und Daniel,
Renditen.Range(Renditen.Cells(6, (letzteSpaltestartNeu + 2)), Renditen.Cells(UBound(X, 1), (letzteSpaltestartNeu + 2))).Resize(UBound(X, 1), UBound(X, 2)) = X
mein Code habe ich nun so geschrieben. Könnte man diesen noch vereinfachen?
Das funktioniert.
Danke für eure "Anregungen". Ich denke so langsam komme ich hinter die Array Eigenschaften :D:D.
Grüße Christian
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:45:55
Daniel
naja, wie ich dir schon schrieb: wenn du die größe des Zellbereichs mit .Resize bestimmst, reicht als Ausgangszellbereich davor die linke obere Eckzelle.
wenn ich beispielsweise den Zellbereich von A1:J10 beschreiben will, nehme ich entweder:
Cells(1, 1).Resize(10, 10) oder Range(Cells(1, 1), Cells(10, 10))
aber
Range(Cells(1, 1), Cells(10, 10)).Resize(10, 10) ist doppeltgemoppelt
wenn ich Start- und Endzeile kenne, nehme ich Range(Cells, Cells)
kenne ich jedoch Startzeile und die Anzahl der benötigten Zeilen, dann Cells.Resize
klaro?
Gruß Daniel
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:48:11
Christian
Hi daniel,
hatte dir zu schnell geantwortet.
Nun noch vereinfacht, sieht der Code so aus.
Renditen.Cells(6, (letzteSpaltestartNeu + 2)).Resize(UBound(X, 1), UBound(X, 2)) = X
Funktioniert einwandfrei.
Vielen Dank für die schnelle kompetente Hilfe.
Christian
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:20:52
Christian
Hallo Daniel,
"schau mal nach, was Ubound(..., 1) bedeutet." das ist mir klar, dass die 1 oder 2 oder.... die 2. Dimension also die Spaltenanzahl ist.
Nur ich weiß ja zu Beginn nicht, wie viele Spalten der Array haben wird.
Wie meinst du das mit dem "dann reicht die Angabe der linken oberen Eckzelle aus"?
Ich könnte also nur .Resize(Zelle,Spalte der Linken oberen Ecke angeben) ohne Ubound(X,1),3) ?
Für micht ist das verständnis mit den Arrays noch sehr sehr schlecht.
Das ist mein erstes VBA Projekt und allgemein erste Erfahrungen mit Codes.
Grüße Christian
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:27:57
Christian
Hallo Daniel,
"schau mal nach, was Ubound(..., 1) bedeutet." das ist mir klar, dass die 1 oder 2 oder.... die 2. Dimension also die Spaltenanzahl ist.
Nur ich weiß ja zu Beginn nicht, wie viele Spalten der Array haben wird.
Wie meinst du das mit dem "dann reicht die Angabe der linken oberen Eckzelle aus"?
Ich könnte also nur .Resize(Zelle,Spalte der Linken oberen Ecke angeben) ohne Ubound(X,1),3) ?
Für micht ist das verständnis mit den Arrays noch sehr sehr schlecht.
Das ist mein erstes VBA Projekt und allgemein erste Erfahrungen mit Codes.
Grüße Christian
Anzeige
AW: Vba: Array dynamisch dimensionieren und einfügen
30.09.2019 17:38:03
Daniel
nein, natürlich mit Ubound.
ich meinte folgendes:
wenn du Schreibst Range("A1:Z1000").Resize(5, 10) bekommst du das gleiche Ergebnis wie mit Range("A1").Resize(5, 10), weil eben das Resize die endgültige Größe vorgibt und von der vorgesetzten Range nur die linke obere Eckzelle verwendet wird.
das Ubound brauchst du natürlich, um die Werte für das Resize zu ermitteln.
mir gings da um das Range(Cells(a, b), Cells(c, d)).Resize(x, y), hier reichet: Cells(a, b).resize(x, y) völlig aus.
Gruß Daniel

14 Forumthreads zu ähnlichen Themen

ArraySumme von ABS Werten in VBA
ABS

Hallo Excel Freunde,
ich stehe gerade bei einer vermutlich banalen Sache auf der langen Leitung.
{=SUMME(ABS(A6:G6)) } Diese ArrayFormel bildet die Summe aller Einzelzellen von A6-G6 aus ihren individuellen ABS Werten.
Wie lautet diese Zeile in VBA, wenn testweise A6-G6 die Selectio...
10.03.2010 20:52:23
Thread-ID: 1144997
4 Beiträge
Anzeige
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
Array mit VBA Array-Funktion erweitern
Arthur

Hallo Excelaner.
Ihr könnt mir sicher helfen ein Array zu erweitern.
Mittels der Array-Funktion erstelle ich ein Array, das später erweitert werden soll.
("a","b","c") ist der erste Teil, später soll ("D","E") hinzukommen
Das Ergebnis wäre in der selben Dimension: ("a","b","c","...
14.09.2015 14:18:41
Thread-ID: 1447344
5 Beiträge
Anzeige
vba Array erstellen
Monika

Hey
gibt es noch eine elegantere Lösung für die Erstellung eines Arrays, dass man gleich zu Beginn die Werte festlegen kann
Mein Code:
Dim Farbe(6) As Integer
Farbe(1) = 32
Farbe(2) = 9
Farbe(3) = 46
Farbe(4) = 10
Farbe(5) = 3
Farbe(6) = 4
14.12.2016 16:34:03
Thread-ID: 1530160
5 Beiträge
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
Diagramm mit VBA dynamisch erweitern?
Nick
Hallo zusammen,Ich habe in Excel ein Diagramm, dass ich dynamisch bei Änderungen erweitern möchte? (wenn das überhaupt möglich ist!?)
z.B. habe ich in einer Spalte 10 Abteilungen, und möchte, dass bei hinzufügen einer elften Abteilung in dieser spalte das diagramm dynamisch erweitert wird...Danke...
15.05.2003 11:26:58
Thread-ID: 256793
4 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
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
3
5
8
4
9
4
3
4
3
2
7
3
4
3