Makro ile Basit Bir Toplama İşlemi Nasıl Yapılır?

[erkanfun]

Makro ile Basit Bir Toplama İşlemi Nasıl Yapılır?
Bu işlemi yapabilmelk için "textbox" ve "buton" da kullanılmasını istiyorum.

Olmasını istediklerim;

Birinci textbox a bir sayı girilecek ,
ikinci textbox a başka bir sayı girilecek,
Butona basılınca üçüncü texbox ta sonuç yazılacak
Eğer 1. veya 2. texbox boş iken butona basılırsa msgbox(lütfen boş alanları doldurun)uyarısı çıksın.

Toplama işlemi A1+B1 sonuç C1 hücresine yapılacak şekilde bağlantı kurulursa anlamam daha kolay olacaktır.

Bunların kodunu yazarsanız sevinirim.

 

[Orion1]

Merhaba.
Aşaığdaki kodlar işinizi görür sanırım.

Private Sub CommandButton1_Click()
If TextBox1.Value = "" Or TextBox2.Value = "" Then
    MsgBox "textbox1 veya textbox2 boş olamaz.!!", vbCritical
    Exit Sub
End If
Range("A1").Value = TextBox1.Value * 1
Range("B1").Value = TextBox2.Value * 1
Range("C1").Value = Range("A1").Value + Range("B1").Value
TextBox3.Value = Range("C1").Value
End Sub

 

[erkanfun]

Sağol arkadaşım deneyip öğrenmeye çalışıcam.

 

[Orion1]

İyi çalışmalar.