Office: Schleifen zählen und Autofill

... es muss 'Spalten zählen' heißen *wink.gif*
Hallo Leute,
ich bastle schon seit einiger Zeit für die Arbeit an einem größeren VBA Code rum, aber momentan bin ich am verzweifeln.

Was ich vorhabe: Im Sheet exisitiert eine 'Tabelle 1' und eine '33'. In der '33' soll nun zunächst eine Formel eingegeben werden, die wird dann für eine variable Zeilenanzahl nach unten kopiert. Damit man die Daten nachher weiter verwenden kann, werden diese nochmal kopiert aber mit 'nur Werte'-Option.

Danach soll es dann in die nächste Spalte gehen usw. usw. Das soll er dann machen, bis alle Daten kopiert sind.

Problem: Zunächst hatte ich einen Autofill über alle Daten angelegt, damit war der Rechner aber überfordert (wir sprechen von Zehntausenden Daten und mehreren Tabellen ('Tabelle 2' '66' usw.). Dann habe ich es mit einer Schleife probiert, die jede Zelle einzeln füllt, das dauert bei diesem Umfang allerdings Stunden und ist daher auch nicht wirklich geeignet. Jetzt bin ich soweit, Spalte für Spalte zu füllen. Das dürfte zeitlich im Rahmen liegen und auch in der Rechenkapazität. Nur: Ich kann durch Spalte = Chr(Asc(Spalte) + 1) leider nur bis Z füllen, dann bekomme ich einen Debug Fehler, ansonsten würde es funktionieren.

Hier mal der Code:

Code:

 

hiho

lese das bitte einmal durch
http://www.ms-office-forum.net/forum...24&postcount=8

Spalten sollten kein String in VBA sein *Smilie

 

Hi,
ja, das habe ich mir vorher auch schon durchgelesen. Du hast die Schleifennlösung drin, die ich auch schon ausprobiert habe, allerdings dauert das eben zu lange. Gibt's ne Möglichkeit, da so einen variablen Autofill einzubauen?

 

hiho

es dauert deshalb so lange weil sehr viele select drinnen sind die nicht benötigt werden, sowie die Formel die ja auch über VBA gemacht werden können und bei vielen Einträgen über Array arbeiten ....
Wenn ich wüsste was gemacht werden sollte könnte ich Dir den Code ja basteln.
für 10 000 Daten sollte eine Laufzeit von za 1 Sek. rauskommen wenn überhaupt.