Veri Silinirken İkaz

[drmurat]

Veri Silinirken Ýkaz

kod yazmayı bilmediğim için makro kaydet ile yaptığım silme makrosunun çalıştırma düğmesine bastıktan sonra birpencere çıkıp eminmisin diye sorsa istiyorum ama bunun bir yolu var mı bilmiyorum.
Birde bir makronun sadece belli bir tarihte (mesela bugün) çalışmasını istersek mümkün olurmu? yani a sütununu bugün b sütununu yarın c sütununu öbürgün genel toplama toplamak mümkün olur mu?
saygılar!


Edit xxrt:"MAKROYU SİLERKEN "EMİNMİSİN" DİYE SORAR MI?"Soru Başlığı "Veri Silinirken İkaz" Olarak değiştirildi.

 

[Levent Menteşoğlu]

Birinci sorunuz için bir mesaj kutusu kullanabilirsiniz. Kendi kodlarınızı aşağıdaki "........." yazan yere kopyalayın. bu tür kodlar için MAKRO DERSANESİ bakınız

[vb:1:7082ab10c7]Sub sonkezsor()
soru = MsgBox("Eminmisiniz?", Buttons:=vbQuestion + vbYesNo)
If soru = vbYes Then
.....................
End If
End Sub[/vb:1:7082ab10c7]

İkinci sorunuz için ise aşağıdaki gibi bir kod işinizi görebilir.Burada A1 hücresine tarih yazılacak. Yazılan tarih bugün ise B1 hücresine "1",yarın ise B1 hücresine "2" yazacaktır. Koddaki [b1]=1,2,3 yazan satırlara kendi çalışmasını istediğiniz kodlarınızı yazın.

[vb:1:7082ab10c7]Sub tarih()
If [a1] = Date Then
[b1] = 1
End If
If [a1] = Date + 1 Then
[b1] = 2
End If
If [a1] = Date + 2 Then
[b1] = 3
End If
End Sub[/vb:1:7082ab10c7]