Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1664to1668
1664to1668
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Begriff in 2-dimensionalem Array suchen

Forumthread: Begriff in 2-dimensionalem Array suchen

Begriff in 2-dimensionalem Array suchen
06.01.2019 07:24:00
Excel2017
Hallo Forum,
ich habe ein 2-dimensionales Array. In der 1. Dimension befindet sich die Artikel-Nummer, in der 2. die Artikel-Gruppe.
Dim MyArray(256,256)
Wie kann ich jetzt in der 1. Dimension nach eine Artikelnummer suchen, um dann über die 2. Dimension die Artikel-Gruppe zu erhalten?
Bisher habe ich das Problem über eine Loop durch alle Einträge gelöstt.
Gruß
Werner
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 08:03:52
Nepumuk
Hallo Werner,
was spricht gegen eine Schleife? Selbst wenn dein Array 100mal so groß wäre ist das eine Sache von Millisekunden.
Gruß
Nepumuk
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 08:32:45
Sepp
Hallo Werner,
wie Nepumuk schon schrieb, spricht nichts gegen eine Schleife.
Du könntest aber auch VLookUp verwenden.
Als Beispiel:
Sub hh()
  Dim varA(5, 5)
  Dim varRet As Variant

  varA(0, 0) = 123: varA(0, 1) = "ABC"
  varA(1, 0) = 234: varA(1, 1) = "DEF"
  varA(2, 0) = 345: varA(2, 1) = "GHI"
  varA(3, 0) = 456: varA(3, 1) = "JKL"
  varA(4, 0) = 567: varA(4, 1) = "MNO"
  varA(5, 0) = 678: varA(5, 1) = "PQE"

  varRet = Application.VLookup(345, varA, 2, 0)

  MsgBox varRet
End Sub


VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media
Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0

 ABCDEF
1Gruß Sepp
2
3

Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 08:55:16
Excel2017
Hallo Sepp,
Danke für Dein Beispiel. Da ich nur Grundkenntnisse in VBA habe, verstehe ich den Syntax von VLookup nicht, obwohl ich versucht habe, mich über Google schlau zu machen.
varRet = Application.VLookup(345, varA, 2, 0)
Die ersten beiden Begriffe kann ich noch zuordnen. Doch was bewirkt die 2 bzw. die 0 an 3. und 4. Position?
Gruß
Werner
Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 09:00:36
Hajo_Zi
Hallo Werner,
Hilfe zu Sverweis.
2 2 Spalte wiedergeben
0 indentischen Wert suchen.

AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 09:13:43
Excel2017
Hallo Hajo,
auch Dir danke ich für Deine Antwort.
Mein Problem ist damit erledigt.
Gruß
Werner
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 09:05:57
Sepp
Hallo Werner,
der erste Parameter ist der Suchbegriff, der zweite das zu durchsuchende Datenfeld, im dritten wird die Spalte angegeben aus welcher der Wert zurückgegeben wird und der vierte ist die Art der Übereinstimmung. Schau dir in Excel die Funktion SVERWEIS() an.
 ABCDEF
1Gruß Sepp
2
3

Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 16:24:00
Daniel
Hi
ich glaube, du hast das mit den 2-Dimensionalen Arrays noch noch nicht so ganz verstanden.
mit Dim MyArray(256,256) bekommst du ein Array, dass 257 Zeilen und 257 Spalten hat.
du brauchst hier aber nur 2 spalten, dh es reicht Dim MyArray(256, 1)
beachte weiterhin:
wenn du beim Dimensionieren eines Arrays nur den Endwert angibst, so ist Startindex im Standardfall die 0.
Deswegen enthält das Array in der jeweiligen Dimension immer ein Element mehr als angegeben.
Wenn du willst, dass der Startindex 1 ist (so wie du es von Zeilen und Spalten gewoht bist), musst du das bei der Dimensionierung extra angeben: 
Dim MyArray(1 to 256,1 to 2)
Gruß Daniel
Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 16:35:59
Excel2017
Hallo Daniel,
vielen Dank für die Aufklärung, mir war bekannt, dass ein Array "normalerweise" bei 0 beginnt und habe das auch so umgesetzt. Mit "1 to 256" hatte ich gleich einen Abbruch, weil ich "Digits(RndVal, 0)" verwende. Aber mit "0 to 256, 0 to 1" läuft alles wieder wie bisher.
Gruß
Werner
Anzeige
AW: Begriff in 2-dimensionalem Array suchen
06.01.2019 17:23:44
Daniel
Hatte ich doch geschrieben:
"Wenn du willst, dass der Startindex 1 ist,..."
Und wenn du das nicht willst, eben nicht.
Ist doch ist irgendwie logisch, oder?
Gruß Daniel
;

Forumthreads zu verwandten Themen

vba-Datenexport nach Excel2007 -Array mit 70000 DS
Tim

Hallo,
ich habe einen Datenexport aus einem Programm nach Excel in vba. Das ganze funktioniert soweit ganz gut.
Nun möchte ich jedoch nicht, das sjede Zeile aus meinem Programm exportiert wird, daher gibt es ein Array mit entsprechenden Datensätzen: Entweder eine 1 (steht für Export der...
20.08.2008 08:57:00
Thread-ID: 1003084
2 Beiträge
Anzeige
VBA FormulaArray nur 256 Zeichen
Werner

Hallo Zusammen,
ich möchte Formeln einer ziemlich umfangreichen Jahresarbeitsplanung in Excel, per VBA-Code korrigieren, da diese Datei(en) x-mal vervielfältigt und "beplant" sind. (über 100 Dateien mit mittlerweile über 28.000 Formeln je Datei)
Bei einer bestimmten Matrixformelgröße, ü...
25.10.2008 21:25:22
Thread-ID: 1019276
9 Beiträge
Anzeige
Probleme bei Sortierung von 2-dimensionalem Array
2-dimensionalem

Hallo,
ich habe leider ein Problem bei der Sortierung eines 2-dimensionalen Arrays. Die Daten an das Array werden von einer Listbox übergeben. Ich erhalte immer die Fehlermeldung "Fehler beim Kompilieren: Unverträglicher Typ: Datenfeld oder benutzerdefinierter Typ erwartet". Der Text "Arr"...
23.07.2009 14:43:19
Thread-ID: 1090821
2 Beiträge
Anzeige
2-dimensionales Array: Doppelte "Zeilen" löschen
Martin

Hallo,
ich lese aus dem Internet etwa 7650 Zeilen mit 13 Spalten in ein Array in Excel ein, was auch sehr gut klappt. Leider kommen einige Zeilen doppelt vor, die ich daher gerne aus dem Array löschen würde. Kennt von Euch jemand eine Function, die alle doppelten Zeilen eines 2-dimensionale...
20.11.2010 15:23:58
Thread-ID: 1187936
10 Beiträge
2-dimensionales Array Sortieralgorithmus
Andi

Hallo,
zuvor habe ich Daten auf einem Excelsheet sortiert.
Jetzt soll aber das ganze auf ein Formular / Tabelle. Auf dem Formular habe ich das Steuerelement "Spreadsheet" von Microsoft eingefügt.
Wie bekomme ich meine Daten sortiert? Muß mehrere Felder sortieren, Nummer aufsteigen...
02.11.2011 17:09:28
Thread-ID: 1236340
2 Beiträge
2 Dimensionales Array transponieren
Nike

Hi,
ich hab da ein Array mit den Dimensionen (9, lngZeil)
der Teil lngZeil ist Variabel
nun möchte ich dieses Array in eine Listbox einlesen,
Me.ComboBox1.List() = arrList
dummerweise muß ich dafür aber den Inhalt zuerst transponieren
um die Darstellung in der Listbox korrekt...
03.07.2002 00:34:04
Thread-ID: 133236
5 Beiträge
Anzeige
Worksheets in dreidimensionales Array einlesen VBA
Jane

Hallo,
ich bin hier noch neu und auch noch nicht so geuebt in VBA.
Vielleicht stehe ich nur auf der Leitung, aber ich wuerde eigentlich gerne nur wissen, wie ich schnellstmoeglich ein ganzes Worksheet in ein dreidimensionales Array einlesen lassen kann ohne jede einzelne Zelle aufrufen...
20.03.2014 04:42:35
Thread-ID: 1354132
6 Beiträge
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
ReDim Preserve eines transponierten 2D Arrays
tengal

Moin!
Die Ausgangssituation auf die Schnelle: ein dynamisches Array(n,m) soll in einer Schleife seine Länge, bzw. die Anzahl Zeilen ändern, die Werte müssen aber bebehalten werden.
Ein Fall für ReDim Preserve, da man hier nicht die Zeilen- sondern nur die Spaltenzahl ändern kann (nur z...
12.04.2016 00:22:07
Thread-ID: 1487428
14 Beiträge
2 Dimensionales Array
Bastian

Halli Hallo
Da ich heute wohl etwas durch einander bin frag ich mal nach =)
Wie bekomme ich aus der rng ein 2D array
Rng = WorksheetFunction.Transpose(Range("A1:A3,C1:D3").Value)
Gruß Basti
16.10.2016 16:42:45
Thread-ID: 1519919
20 Beiträge
[VBA] Array1, Array2,... mit variable im Namen
Nils

Hallo zusammen,
ich habe 16 Arrays mit den Namen:
Stand1, Stand2, Stand3, ... , Stand16
Für jedes Array habe ich eine Schleife:
If Not IsEmpty(Stand1) Then If UBound(Stand1) = 0 Then Cells(Stand1(i), "L") = "Nutzlos" Else For i = 0 To UBound(Stand1) - 1 If Cells(Stand1(i), "C")...
31.01.2017 21:55:05
Thread-ID: 1538612
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige