• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

MsgBox

Katılım
4 Kasım 2005
Mesajlar
66
MsgBox da iptale basıldığında yazdırmayı iptal etsin
nasıl bir kod yazmma gerekiyor yardımlarınızı bekliyorum
 
a = msgbox("Yazdırayım mı ?", vbYesNo)
If a = vbYes Then
activesheet.printout
else
exit sub
end If

şeklinde bir deneyiniz.
(test etmedim)
 
Merhaba
Kod:
SR = MsgBox("Yazdırmak İstiyor Musunuz", vbYesNo, "Soru")
If SR = vbNo Then Exit Sub
'Yazdırma Makrosu
Bu kodu dener misiniz_?
 
Geri
Üst