Berechnung deaktivieren!
Gordon
hab das ganze zwar vorhin schon mal geschrieben, aber irgendwie wurde das wohl nicht übernommen. Naja, ich schreibe dann jetzt nochmal! :-)
Also folgendes Problem:
Ich habe eine große Excel-Datenbank (120MB), wo auch viele Formeln (u.a. sverweise) drin vorhanden sind. Die braucht beim Öffnen immer etwa 10min bis sie einsatzfähig ist. Sobald ich ein Feld ändere, beginnt die Berechnung von vorne. Daher habe ich auch in den Options die Berechnung von automatisch auf manuell geschaltet. Das ging dann wunderbar.
Nun habe ich aber eine zweite Datei mit einem VBA-Makro. Diese greift auf die Datenbank zu bzw. öffnet diese und zieht sich Werte raus. Als Beispiel gelten nun mal diese drei Code-Zeilen - es sind natürlich viel mehr im anzen Code:
ThisWorkbook.Sheets("KST").Range("B2:B" & count - 2).Value = NeueDatei.Sheets("DB").Range("R9:R" _
& count).Value
ThisWorkbook.Sheets("KST").Range("E2:E" & count - 2).Value = NeueDatei.Sheets("DB").Range(" _
S9:S" & count).Value
ThisWorkbook.Sheets("KST").Range("A2:A" & count - 2).Value = NeueDatei.Sheets("DB").Range(" _
Q9:Q" & count).Value
Hat vielleicht jemand eine Idee, wie ich das umgehen kann bzw. so bekomme, dass diese Berechnung nicht mehr stattfindet? Wäre sehr zu Dank verpflichtet!
Besten Gruß
Gordon