Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1228to1232
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
Inhaltsverzeichnis

Besondere Auflistung

Besondere Auflistung
WalterK
Hallo,
ich suche eine Formellösung für folgendes Problem:
In den Spalten A und B steht ab Zeile 2:
Spalte A | Spalte B
1 | 3
2 | 2
3 | 5
4 | 0
5 | 15
usw.
In Spalte D sollte dann untereinander die Zahl 1 dreimal stehen, dann darunter die Zahl 2 zweimal, dann darunter die Zahl 3 fünfmal, dann sollte die 4 ausgelassen werden, also geht es mit der Zahl 5 fünfzehnmal weiter. Die Spalte würde dann so aussehen:
1
1
1
2
2
3
3
3
3
3
5
5
5
5
5
usw.
Die Spalte A kann die Zahlen von 1 bis 12 umfassen, die Spalte B kann auch Zahlen über 100 haben.
Besten Dank für die Mühe!
Servus Walter

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Besondere Auflistung
05.09.2011 17:15:41
Henrik
Hallo Walter,
versuch das mal. Namen, Zeilen und Spalten entsprechend anpassen.

Sub holla()
Dim zae1 As Long, zae2 As Long, zae3 As Long
With ThisWorkbook.Worksheets("Tabelle1") ' Namen anpassen
For zae1 = 1 To .Cells(.Rows.Count, "A").End(xlUp).Row
For zae2 = 1 To .Cells(zae1, "B").Value
zae3 = zae3 + 1
.Cells(zae3, "D").Value = .Cells(zae1, "A").Value
Next zae2
Next zae1
End With
End Sub

Gruß Henrik
AW: Besondere Auflistung
05.09.2011 18:08:47
WalterK
Hallo Henrik,
besten Dank für den Code, er funktioniert auch einwandfrei.
Trotzdem hätte ich lieber eine Formellösung, wenn es denn eine solche geben sollte.
Servus, Walter
Anzeige
AW: Besondere Auflistung
05.09.2011 18:36:19
Claus
Hi Leute,
Wow, die Formel ist genial. Habe grade auch eine Lösung versucht, bin aber kläglich gescheitert. Es ist aber immer wieder erstaunlich, was man mit diesen Arrayformeln alles hinbekommt.
Grüßle Claus
AW: Besondere Auflistung
05.09.2011 18:45:39
WalterK
Hallo Robert,
besten Dank, es funktioniert ausgezeichnet.
Servus, Walter
..na das freut mich ;-) oT
05.09.2011 18:48:29
robert
wichtige Anmerkung ...
06.09.2011 11:53:50
Matthias
Hi robert
In Deiner Bsp.Datei ist nur 2x die 9 statt 5x


schnell WegDuck ;o)


weiter unten lesen ...
Und jetzt ganz im ernst:
Gefällt mir!
Gruß Matthias
Anzeige
@Matthias, Du hast aber...
07.09.2011 12:04:12
robert
Hi Matthias,
..sicher bemerkt, bzw.erkannt warum das so ist ;-)
Ich möchte aber auch zugeben, dass diese Formel nicht
aus meiner Feder stammt, sonder aus meinem Fundus.......
-ist aber schwer genug, um immer das richtige zu finden ;-)
Gruß
robert

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige