Problem beim Kopieren von Formeln
07.01.2005 12:56:46
Formeln
ich habe folgendes Problem: über eine Schleife möchte ich Formeln zur Glättung von Daten in einem Tabellenblatt kopieren. Mein Code dafür sieht so aus:
Sub Test()
Glatt.Cells(4, 2).Formula = "=(1-Konfiguration!$B$1)*B3+Konfiguration!$B$1*Import!B4"
For i = 5 To Cells(Rows.Count, 1).End(xlUp).Row
Glatt.Cells(4, 2).Copy Destination:=Glatt.Cells(i, 2)
Next i
End Sub
Das komische ist jetzt, dass VBA in alle gewünschten Zellen die richtigen Formeln schreibt, aber das Ergebnis, das in den Zellen angezeigt wird stets dasselbe ist und nicht das Ergebnis der Berechnung aus der Formel (Neu berechnet wird automatisch, daran kann es also nicht liegen). Hat irgend jemand eine Idee was da falsch läuft? Vielen Dank.
Viele Grüße
Andreas
Anzeige