Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1180to1184
1180to1184
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Array in VBA

Forumthread: Array in VBA

Array in VBA
PeTeR
Hallo VBA-Freaks,
ich habe 2 Spalten: Typ und Größe
Z.B.:
Typ Größe
A 1
B 3
A 4
C 2
A 5
B 1
C 4
Als Ergebnis hätte ich gerne folgendes (am liebsten per Makro in einem Array mit X*2 Feldern):
A: 1;4;5
B: 3;1
C: 2;4
Viele Dank für Eure Hilfe
PeTeR
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Array in VBA
20.10.2010 13:56:57
Rudi
Hallo, 
Sub ttt()
Dim oDict As Object, i As Long, arrKeys, arrItems
Set oDict = CreateObject("Scripting.Dictionary")
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If Not oDict.Exists(Cells(i, 1).Value) Then
oDict.Add Cells(i, 1).Value, Cells(i, 2)
Else
oDict(Cells(i, 1).Value) = oDict(Cells(i, 1).Value) & "; " & Cells(i, 2)
End If
Next i
arrKeys = oDict.keys
arrItems = oDict.items
Cells(1, 4).Resize(oDict.Count) = WorksheetFunction.Transpose(arrKeys)
Cells(1, 5).Resize(oDict.Count) = WorksheetFunction.Transpose(arrItems)
End Sub

Gruß
Rudi
Anzeige
AW: Array in VBA
20.10.2010 14:10:51
PeTeR
Hallo Rudi,
wow :-0 ich bin mächtig beeindruckt!! Sieht ja echt heiss aus und funktioniert auch noch - Wahnsinn! Das muss ich jetzt mal genauer analysieren.
Ganz, ganz vielen DANK
PeTeR
viel Spaß bei der Analyse owT
20.10.2010 14:14:39
Rudi
Codes von Rudi
20.10.2010 14:51:11
Rudi
Tja, die Codes von Rudi zu verstehen ist nicht so einfach, spreche da aus Erfahrung ;-),
aber die funktionierten bei mir immer. Wobei ich einen Code bis heute habe liegen lassen,
bis meine VB Kenntnisse so gut sind, dass ich ihn verstehe und auch anpassen könnte.
Anzeige
Sooo schlimm ...
20.10.2010 15:11:25
Rudi
Hallo,
... sind sie auch wieder nicht. Das kann man fast alles in der VBA-Hilfe nachlesen.
Wenn ich z.B. an Nepumuks Codes denke... ;-)
Gruß
Rudi
Codes von Rudi
20.10.2010 15:58:45
Rudi
Tja, die Codes von Rudi zu verstehen ist nicht so einfach, spreche da aus Erfahrung ;-),
aber die funktionierten bei mir immer. Wobei ich einen Code bis heute habe liegen lassen,
bis meine VB Kenntnisse so gut sind, dass ich ihn verstehe und auch anpassen könnte.
Anzeige
;

Forumthreads zu verwandten Themen

Array-Formel in VBA-Code umwandeln?
Robert

Hallo,
ich bräuchte bitte eure Hilfe.
Hab folgende Formel...
Selection.FormulaArray = _
=IF(ROW(R[-107]C[-3])>COUNTA('1'!R5C[4]:R200C[4]),"""",INDEX('1'!R5C4:R200C4,SMALL(IF('1'!R5C[4]:R200C[4]<>"""",ROW(R1:R196),""""),ROW(R[-107]C[-3]))))"
Mein Problem ist, dass ic...
26.10.2008 10:56:28
Thread-ID: 1019326
13 Beiträge
Array-Formel in VBA
Peter

Hallöchen liebe Excel Gemeinde,
ich hab da ein kleines Problem, wo ich hoffe, dass mir die VBA Spezialisten unter Euch helfen können.
Und zwar geht es um folgende Formel im VBA Code:
wb1.Worksheets(letztdat3).Cells(4, d).FormulaArray = _ "=SUM(COUNTIF(INDIRECT("""" & TRANSPOSE...
02.02.2009 17:28:00
Thread-ID: 1046339
6 Beiträge
Array in Tabelle schreiben
eres

Schönen Gruß in mein Lieblings-Forum,
ich lese sequentiell aus einer riesigen csv-Datei die ersten 50.000 Sätze in ein Array. Nach dem Einlesen möchte ich die Werte in ein sheet schreiben.
Dim HilfsArray(1 To 50000) As String
Dim i as long
Open Input_File For Input As #1
D...
08.04.2009 14:15:07
Thread-ID: 1067735
5 Beiträge
Array In Vba
@lex

Hallo VBA-Spezialisten !
Seit graumer Zeit suche ich ein Code-Gerüst um Arrays in VBA zu programmieren.Hintergrund:
Ich habe ca. 500 Shapes (MSMap) in einem Blatt.
Mit einer Schleife wird jedes Objekt auf eine Eigenschaft geprüft.
Ist die Prüfung wahr, dann soll dieses Objekt der Se...
12.04.2002 11:59:16
Thread-ID: 112756
4 Beiträge
Array Formel summe wenn in VBA umwamdeln
t.wegmann@hengegroup.com

Hallo Liebes Forum,
ich habe ein Problem mit meiner Array-Formel:
=SUMME(WENN(('DATEN NEU'!$F$2:$F$25048=Frachten!$D4)*('DATEN NEU'!$N$2:$N$25048=Frachten!$F4) *('DATEN NEU'!$X$2:$X$25048=Frachten!H$2);'DATEN NEU'!$AB$2:$AB$25048))
Die Formel funktioniert gut, nur wenn ich die Date...
01.03.2010 09:54:52
Thread-ID: 1142293
2 Beiträge
Anzeige
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
array to range, range to array
Andi

Hallo,
Opa Helmut auf dem Fahrrad:
For i = 1 To UBound(arr)
Cells(1, i) = arr(i)
Next 'i
Raumschiff Enterprise
Range(Cells(1, 1), Cells(1, UBound(arr))) = arr
Ich favorisiere die Methode Raumschiff Enterprise, aber wenn ein arr Speicherplatz mit 1000 Zeichen belegt...
21.12.2010 18:50:18
Thread-ID: 1192391
12 Beiträge
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
VBA, Werte anhand Koordinaten in Tabelle schreiben
Christian

Hallo, ich hab ein kleines Problemchen welches ich gerne mittels VBA lösen möchte. Leider komme ich auch nach einiger Suche nicht mal ansatzweise auf eine Lösung.
Das ganze sieht so aus:
Ich habe 2 Tabellen:
Tabelle 1 hat 3 Spalten z.b. so:
Pos | Blatt | Wert
1 | 1...
01.09.2011 19:10:08
Thread-ID: 1228358
3 Beiträge
Tabellenblatt einmal als pdf und einmal xls datei
Paddey

Hallo an alle:)
ich hab da ein kleineres Problem.
Erschlagt mich bitte nicht gleich wenn es jetzt nicht das schönste Makro ist was ihr bis jetzt gesehen habt, ist das erste Mal das ich mich mit dem Thema Makros auseinander gesetzt habe.
Das was ich da bis jetzt zusammen geschrieben...
29.09.2013 18:55:06
Thread-ID: 1332586
7 Beiträge
Tabellenblatt einmal als pdf und einmal xls datei
Paddey

Hallo an alle:)
ich hab da ein kleineres Problem.
Erschlagt mich bitte nicht gleich wenn es jetzt nicht das schönste Makro ist was ihr bis jetzt gesehen habt, ist das erste Mal das ich mich mit dem Thema Makros auseinander gesetzt habe.
Das was ich da bis jetzt zusammen geschrieben...
29.09.2013 19:11:41
Thread-ID: 1332588
3 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
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige