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
1744to1748
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
1744to1748
1744to1748
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Eindimensionales Array von einer Spalte erzeugen

Eindimensionales Array von einer Spalte erzeugen
07.03.2020 00:35:56
einer
Hallo
Wie kann man aus einem einspalteigen Tabellenbereich ein eindimensionales Array erstellen?
Wie kann man ein eindimensionales Array in eine Tabelle übertragen?
Zum Beispiel: Der Bereich B3:B20 soll in einem eindimensionalen Array abgebildet werden, mit dem die einzelnen Werte mit einer Zahl abgerufen werden können. Bereich(3) sieht nun mal besser aus als Bereich(3,0), wie ich es jetzt machen muss, weil ich aus jedem Range einer Tabelle nur als zweidimensionales Array bekomme, auch wenn es nur eine Spalte oder eine Zeile ist.
LG, Barbara

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

Betreff
Datum
Anwender
Anzeige
AW: Eindimensionales Array von einer Spalte erzeugen
07.03.2020 00:49:47
einer
Hallo Barabara,
Sub asd()
Dim Bereich As Variant
Bereich = Application.Transpose(Range("B3:B20").Value)
End Sub
Gruß Uwe
Das kommt darauf an, ...
07.03.2020 04:48:22
Luc:?
…Barbara,
wie die Ausrichtung des Arrays sein soll. Alles, was aus Xl kommt, ist 2dimensional. VBA kennt dagegen 1dimensionale Kovektoren (horizontal, Zeile) und 2dimensionale Vektoren (vertikal, Spalte). Durch Transpose kann zwar ein Vektor in einen Kovektor gewandelt wdn, er ändert dann aber auch die Ausrichtung (beim Rückschreiben aufs TabBlatt). Es sind aber auch 1dimensionale Vektoren möglich, nur mit einem anderen Array-Typ. Bei Anwendung in einer UDF in einer ZellFml würde Xl einen solchen Vektor auch in einen normalen 2dimensionalen Xl-Vektor transformieren, nur nicht beim Schreiben aus einer SubProzedur heraus. Da muss man selbst für die Transformation sorgen.
Ein solcher Vektor ist zu erreichen, indem man jeden einzelnen Wert in ein Array wandelt, daraus wieder ein Array bildet und dieses dann einem Variant übergibt. Der 1.Index bezeichnet dann ein Element (ja ebenfalls ein Array) dieses Arrays, der 2. (ggf kaum benötigte) dann den Wert im Element-Array, also bspw so myArray(0) bzw myArray(0)(0). VBA ordnet ein solches Konstrukt automatisch als Vektor (vertikal) an. Das gilt auch, falls ein Element-Kovektor aus mehr als einem Wert (SekundärElement) besteht. So kann man mehrstufige Tensoren aufbauen, deren Array-Elemente stets 1dimensional sind. Auf ein TabBlatt sichtbar abbildbar sind aber maximal nur die 2stufigen Tensoren.
Morhn, Luc :-?
„Die universelle Befähigung zur Unfähigkeit macht jede menschliche Leistung zu einem unglaublichen Wunder.“ Stapps ironisches Paradoxon
Nichtsdestotrotz Durchblick verbessern mit …
Anzeige
AW: Eindimensionales Array von einer Spalte erzeugen
07.03.2020 10:23:18
einer
Ein zweidimensionales Array ist mM auch leichter zu verstehen.
die erste Zahl für die Position im Array und dahinter der dazugehörige Wert.
z.B. Bereich(10,Meier) würde heißen, dass der Meier an zehnter Stelle in deiner Spalte stehen würde.
AW: Eindimensionales Array von einer Spalte erzeugen
07.03.2020 10:56:39
einer
Mit Eurer Hilfe, insbesodere den Hinweis auf "Transpose", kann ich mein Problem lösen. Ich habe Makros, die mit eindimensionalen Arrays arbeiten, außerdem finde ich es übersichtlicher.
Ich verwende nun folgende Lösung, wo ein Spaltenbereich in ein eindimensionales Array kopiert wird, und dieses dann daneben wieder in die Tabelle gestellt wird. 

Sub Array_Eindimensional()
Dim vInhalt     As Variant
Dim rBereich    As Range
Set rBereich = Range("B3:B20")
'Ein eindimensionales Array wird erstellt
vInhalt = Application.WorksheetFunction.Transpose(rBereich.Value)
'Hier kann mit vInhalt gearbeitet werden.
'Rückführen in den Bereich 2 Spalten daneben
rBereich.Offset(0, 2).Value = Application.WorksheetFunction.Transpose(vInhalt)
End Sub
Vielen Dank für Eure Antworte und LG, Barbara
Anzeige
AW: Eindimensionales Array von einer Spalte erzeugen
07.03.2020 13:38:24
einer
Wenn Dein Bereich horizontal ist, z. B. A1:Z1, dann musst Du 2x transponieren.
Viele Grüße,
Bernd P
z. B. A1:Z1, dann musst Du 2x transponieren ...
07.03.2020 13:59:15
Kuwer
Hallo Bernd,
... oder gar nicht. ;-)
Gruß Uwe
Ich bezog mich auf das Zurückschreiben ;-)
08.03.2020 11:00:44
Kuwer
....

15 Forumthreads zu ähnlichen Themen

Werte in Array schreiben: Ich brauche Hilfe
Holger,

Guten Morgen liebes Forum,
heute steht mal wieder das unleidige Thema Array an meiner Tagesordnung.
Stück für Stück nähere ich mich an. In diesem Fall schleife ich durch einen Rangebereich.
Hierbei prüfe ich ob der Zellwert unter dem aktuellen unterschiedlich ist oder nicht.
Sin...
16.02.2011 10:28:56
Thread-ID: 1201093
18 Beiträge
Anzeige
Per VBA Werte in eine Datei schreiben
Tobias

Hallo Leute,
ich möchte für den Brötchenverkauf in der Schule eine Statistik erstelle.
Jeden Tag soll , bei klicken des Bottons, aus der Excel Tabelle, die Anzahl, die Produktnummer, der Preis und die Kategorie in die Tabelle "Daten" geschrieben werden.
Mit folgendem Makro ist es...
09.02.2014 16:58:33
Thread-ID: 1348795
5 Beiträge
Bereich definieren (verbinden und ausfüllen)
urmila

Hallo liebe Community,
ich hoffe ihr könnt mir bei folgendes behilflich sein.
Ich habe eine Liste, darin sind viele Bestellungen. In Spalte B steht immer ein Datum, z.B. 22.06.2013 steht 7 mal, der 21.06.2014 z.B. 3 mal usw.
Ich würde gerne (per VBA) dass in Spalte A abhängig von de...
22.06.2014 21:34:56
Thread-ID: 1366933
7 Beiträge
Anzeige
VBA: Durchschnitt der x-größten Werte eines Arrays
Martin

Hallo,
gibt es eine einfache Möglichkeit den Durchschnitt der x-größten Werte eines Arrays zu ermitteln als VBA-Lösung? Als Formel geht es recht einfach:
http://chandoo.org/wp/2010/06/04/average-of-top-5-values
Ich habe eine Function mit einer Schleife geschrieben, aber vielleicht d...
25.11.2015 12:32:03
Thread-ID: 1460616
10 Beiträge
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: Array von Textboxen mit Zellwerten befüllen
Textboxen

Hallo zusammen,
ich möchte gerne folgendes erreichen: Aufgrund des 255 Zeichenlimits für Textboxen/-felder, möchte ich - im vorliegenden Fall 4 - mehrere Textboxen mit dem Inhalt bestimmter Zellen befüllen.
Exemplarisch für eine einzelne Box sieht mein Code wie folgt aus: Sub FillTextBo...
14.08.2018 10:04:50
Thread-ID: 1639266
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
Mit VBA Werte in Zellen schreiben
nightcab

Hallo Freude!
Ich brauche eure Hilfe.
Für den Bereich I100:I1899 soll gelten.
Spalte E | Spalte I | Spalte J
Datum gestern | "Fahrer 1" | "Wagen 1"
Datum heute | "Fahrer 2" | "Wagen 2"
Datum heute | "Fahrer 3" | "Wagen 2"
Das hab ich bis jetzt: Private Su...
10.03.2019 14:16:59
Thread-ID: 1680444
22 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
17
2
4
6
3
9
4
3
4
21
2
2
1
9
9