FORMULALOCAL kullanımı

[mesutaygun70]

Sub FORMÜL()
Sheets("SAYFA1").Range(“C1”).FormulaLocal=”=TOPLA(Sheets("SAYFA2").Range(“B1:B10”)”
End Sub

yukarıdaki gibi bir kod yazmaya çalışıyorum. Tabi çalışmadı nasıl yapabilirim. Sayfaya direkt formül yazmak istemiyorum. dosyayı büyüttüğü için. Buna benzer çok fazla formül girmem gerekiyor.

Yukarıdaki işlem sayfa1 c1 hücresine = sayfa 2 b1 ile b10 arasını toplamasını istiyorum.

 

[Ömer BARAN]

Merhaba.

Aşağıdaki gibi deneyin.
.

    Sheets("SAYFA1").[C1] = Evaluate("=SUM(SAYFA2!B1:B10)")