Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1028to1032
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

Zahlengruppen einzeln darstellen

Zahlengruppen einzeln darstellen
01.12.2008 23:42:00
MG_Learning
Hallo zusammen!
Wie könnte ich folgendes Problem in Excel bzw. mit VBA lösen!
Habe zwei Spalten mit etwa 700 Einträgen:
Spalte A:
00404
23689
23456
00458
23458
.......
Spalte B:
00404
23691
23456
00462
23458
......
Manchmal sind die Werte in einer Zeile gleich, manchmal wie in zeile 2 zum Beispiel sind mehrere zusammengefasst also 23689 bis 23691!
Wie kann ich diese analog zu den anderen pro Zeile einzeln aufschlüsseln, also daraus
23689
23690
23691
.....
machen. so dass ich pro zeile in spalte A und B immer die gleichen Zahlen nebeneinander habe?
Kann mir jemand weiterhelfen!
Gruß Monty

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlengruppen einzeln darstellen
02.12.2008 00:21:00
Daniel
hi
probier mal das:

Sub Test()
Dim Zeile1 As Long, Zeile2 As Long
Dim Wert As Long
For Zeile1 = 1 To Cells(Rows.Count, 1).End(xlUp).Row
For Wert = Cells(Zeile1, 1).Value To Cells(Zeile1, 2).Value
Zeile2 = Zeile2 + 1
Cells(Zeile2, 3).Value = Wert
Next Wert
Next Zeile1
End Sub


die Werte sollten ohne überschrift in Spalte A und B stehen, die neue Reihe wird in Spalte C erzeugt
Gruß, Daniel

Anzeige

312 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige