Intervall auffüllen - Makro läuft ewig
Claus
ich habe folgendes Problem:
Ich habe eine Liste:
Spalte 1 (von) Spalte 2 (bis) Spalte 3 (Kennzeichnung)
1 10 a
11 15 b
etc.
Da ich alle Einzelwerte zwischen den Intervallen haben will habe ich mir ein Makro geschrieben, _
das in dem Fall die erste Zeile kopiert und aus der 1 eine 2 macht usw. bis er bei 10 ist und _
dann beim nächsten Intervall landet. Der VBA-Code sieht so aus:
Sub Konten_auffüllen()
Cells(2, 1).Select
Application.ScreenUpdating = False
Do
If ActiveCell.Value Problem ist, das Ding läuft ewig. Gut Am Ende müßten da statt ursprünglich ca. 180 nun 18-20.000 Zeilen stehen, aber trotzdem lief das bei mir jetzt über Nacht und ist immer noch nicht fertig. Excel Version ist 2007 SP2. Hab es als .xls und als .xlsm versucht. Weiß jemand Rat wie man das beschleunigen kann?
Grüße Claus