Microsoft Excel

Herbers Excel/VBA-Archiv

Datenfeld

Betrifft: Datenfeld von: siegfried
Geschrieben am: 13.08.2014 12:22:08

Hallo zusammen

ich habe in einer Tabelle folgende Einträge:

G1-1 G1-2 G1-3 G1-4 2602 2494 2503 2435
G2-1 G2-2 G2-3 G2-4 2475 2390 2449 2471

1 4 6 5
2 7 8 3

mit diesem Code nehme ich die Nummern (1 bis 8) in ein Datenfeld

' notiert die Nummer
Sheets(BlattBezugDatenfeld).Activate
ReDim ArrNr(1 To Anz, 1 To Stä)
For n1 = 1 To Anz
For n2 = 1 To Stä
ArrNr(n1, n2) = _
Range(ZelleBezugDatenfeld).Offset(8 + n1, NrCol - 1 + n2).Value
Next n2
Next n1

Für die Bezeichnungen (G1-1 bis G2-4) und die daneben stehenden Zahlen habe ich jeweils einen separaten analogen Code.
Wie kann man alle Daten in einem Datenfeld aufnehmen?

Gruß
Siegfried

  

Betrifft: AW: Datenfeld von: Rudi Maintaire
Geschrieben am: 13.08.2014 14:03:54

Hallo,
deinen Beitrag verstehe ich nicht.

Ein Array kannst du aus einem Bereich nach dem Motto
Array=Bereich
füttern. Komplett ohne Schleife.

Gruß
Rudi


  

Betrifft: AW: Datenfeld von: siegfried
Geschrieben am: 13.08.2014 15:26:21

Hallo Rudi,

Danke für Deinen Hinweis.
In meiner Vorstellung hatte ich an ein mehrdimensionales Datenfeld gedacht.

Gruß
Siegfried


 

Beiträge aus den Excel-Beispielen zum Thema "Datenfeld"