Formulü Makro ile Sütunlara Kopyalama

[metin_0606]

Değerli arkadaşlar paylaşmış olduğum çalışmadaki D sütunundaki formülle yapılmış işlemleri makro ile son satırı baz alarak nasıl yaptırabilirim.

 

[ASLAN7410]

Merhaba.

Sub FormülUygula()
Range("D2:D65565").ClearContents
With Range("D2:D" & [A65565].End(3).Row)
    .FormulaLocal = "=(B2/C2)"
    '.Value = .Value
End With
End Sub

 

[metin_0606]

Merhaba.

Sub FormülUygula()
Range("D2:D65565").ClearContents
With Range("D2:D" & [A65565].End(3).Row)
    .FormulaLocal = "=(B2/C2)"
    '.Value = .Value
End With
End Sub

Teşekkürler Sayın Aslan