[VBA] FillDown aber ohne Formatierung

[Nico_B]

Hallo.

Ich habe ein Makro, dass mir eine Formel runterziehen soll. Leider nimmt Excel auch immer die Formiertung mit.

ActiveSheet.Range("B14:F" & x).FillDown

kann man folgenden Code irgendwie erweitern, sodass nur die Formel ohne formatierung gezogen wird?

 

[GMG-CC]

Moin,

das sollte so gehen:

Sub NurFormelKopieren()
   Dim Formel As String
   Dim Zeile As Integer
   
   Formel = Cells(1, 1).Formula
   For Zeile = 2 To 10
      Cells(Zeile, 1) = Formel
   Next Zeile
End Sub