İki Sayının Sabit toplam olarak makro ile formüle edilmesi

[Mx@Raid]

Arkadaşlar; iki sayının toplama işeleminin formüle edilmesinin yolunu bulmaya çalışıyorum. Nedeni bu işlemin bir çok yerde tekrarlanmasını gerektiriyor. Her defasında tekrar tekrar formülü yazmak yerine bir tanımlama getirerek sonuç elde etmek.

Örneğin:
Sub topla()
a = Formula = "=Sum(a1,a2)" burada formülü bir değişkene atamak istiyorum
Range("a3") = a burada ise değişkenin sonucunun hücreye gönderilmesini
End Sub

tabi bu konuda yeni olduğum için istediğim sonuca varamıyorum. Yardımlarınızı bekliyorum.
Makro bölümünde hayli araştırma yaptım ama gözümden kaçma ihtimali olmakla birlikte rastlayamadım.
Bilgi paylaşımınız için şimdiden teşekkür ederim.

 

[Ayhan Ercan]

Merhaba ;

Aşağıdaki gibi deneyiniz...

Sub topla()
 
a = Sheets("Sayfa1").Range("A1").Value + Sheets("Sayfa1").Range("B1").Value
Sheets("Sayfa1").Range("A2").Value = a
End Sub

 

[Mx@Raid]

Teşekkürler emeğinize sağlık.

 

[Ayhan Ercan]

Teşekkürler emeğinize sağlık.

Rica ederim.
İyi Çalışmalar...