Seite 1 von 1

[gelöst] array füllen

Verfasst: Mi, 15.10.2025 10:34
von clag
Hall Kenner und Könner
versuche gerade nach ein paar Jahren abstinez ein makro zu erstellen welches eine bestimmte fixe an Zahlengruppen benötig 12 dreier Gruppen, die würde ich gern gleich als erstes in ein Array schreiben für ein einfaches Array geht das ja mit

Code: Alles auswählen

za = Array(1000, 800, 500, 200, 50, 5)
für drei einzelne Arrays

Code: Alles auswählen

zax = Array(1000, 800, 500, 200, 50,12, 5)
zay = Array(900, 600, 400, 150, 40, 10, 4)
zaz = Array(32, 24, 16, 8, 6, 4, 2)
aber wie bekomme ich die Zahlen am einfachsten in ein Array ?

Code: Alles auswählen

Dim za (1 to 3 , 1 t0 12 )
und dann ?

Re: array füllen

Verfasst: Mi, 15.10.2025 12:59
von mikeleb
Hallo,

Code: Alles auswählen

za =Array(Array(1000, 800, 500, 200, 50,12, 5), Array(900, 600, 400, 150, 40, 10, 4), Array(32, 24, 16, 8, 6, 4, 2))

array füllen

Verfasst: Mi, 15.10.2025 13:09
von clag
ahhh .. allerbesten Dank
Wissen ist Macht :D

Re: array füllen : gelöst

Verfasst: Mi, 15.10.2025 14:26
von clag
hmmm zu früh gefreut

auf diese Weise bekomme ich keine a
Anwort aus dem Arry

Code: Alles auswählen

za = Array(Array(3000, 1763, 755, 587, 352, 278, 135, 66, 33), Array(2382, 1411, 671, 535, 332, 265, 132, 66, 33), Array(1764, 1059, 588, 482, 312, 252, 130, 66, 33)) 
print za(2, 4)
bringt Fehler Objectvariable nicht belegt
was mache ich falsch ?

Re: array füllen : gelöst

Verfasst: Mi, 15.10.2025 15:16
von Gast
die Arrays werden angelegt habe ich mit

Code: Alles auswählen

print isarray(za) 
print Ubound(za)

geprüft, aber wie es scheint werden die Werte nicht übernommen ??

Re: array füllen : gelöst

Verfasst: Mi, 15.10.2025 15:33
von mikeleb
Hallo,
mein Ansatz liefert ein Array von Arrays. Der Zugriff wäre hier:

Code: Alles auswählen

print za(2)(4)

Re: array füllen : gelöst

Verfasst: Do, 16.10.2025 15:32
von clag
nochmals mein Dank Mikeleb
mit den so gesetzten Klammern funktioniert es auf Anhieb...