CommandButton'a tıklayınca uyarı versin

[ferhatgurbuz]

Private Sub CommandButton3_Click()
For i = 11 To 320
Cells(i, "bj").Value = Cells(i, "bj").Value + Cells(i, "an").Value
Next i
End Sub




Yukarıdaki işlemi yapmak için CommandButtonu tıklayınca "Eminmisiniz" diye bir uyarı versin Ondan sonra Evet Yada Hayır seçenekleri olsun eveti tıklayınca işlemi yapsın hayırı tıklayınca işlem yapmasın. Böyle birşey istiyorum. Yardımcı olan arkadaşlara teşekkürler.

 

[N.Ziya Hiçdurmaz]

Kodun başına ekleyiniz.
if MsgBox ("işlem yerine getirilsinmi.", vbYesNo) = vbNo Then
exit Sub
End if

 

[ferhatgurbuz]

teşekkür ederim V.Basic For Applications sizler bir harikasınız.

 

[sultan murad]

herhangi bir uyarı

merhaba,
formüllü iki hücrenin kıyaslanmasıyla uyarı vermesini nasıl sağlayabiliriz?
mesela a1 ve b1 dışarıdan veri alan iki hücre olmak üzere
if(A1>B1) ise msgbox ile uyarı ver gibi
bi de merak ettiğim bi konu daha excele ikinci bir programı çalıştırması komutunu verebiliyomuz formülle?
run(wmplayer.exe)
gibi mesela?