• DİKKAT

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

Soru MSGBOX kısmını userform üzerinde gerçekleştirme

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,543
Excel Vers. ve Dili
2021 LTSC TR
Cümleten Ramazan Bayramınızı tebrik ediyorum
Kod:
  Dim cevap As Integer
    cevap = MsgBox("Bulunan satırı silmek istediğinizden emin misiniz?", vbYesNo + vbQuestion, "Silme Onayı")
    If cevap = vbYes Then
Yukarıda ki mesaj olayını iptal ederek aşağıda ki şekil ile kullanmak mümkün müdür?

frmMesaj.lblMesaj.Caption = "Bulunan satırı silmek istediğinizden emin misiniz?", vbYesNo + vbQuestion
frmMesaj.Show
 
Merhaba,

Bu tabii ki mümkün fakat bunun için ekstra UserForm kullanmanız ve butonları sizin yaratmanız gerekiyor. Ve bildiğim kadarıyla Label nesnesinin vbYesNo yada vbQuestion gibi işlevleri yok. Bunlar için de UserForm'a resimler eklemelisiniz. Her açıdan daha zahmetli ve verimsiz aslında. Neden ihtiyacınız olduğunu tam olarak anlamasam da şöyle bir örnek bırakabilirim. Butona Resim Eklemek konusunu inceleyerek de görsel olarak tamamlayabilirsiniz.
 

Ekli dosyalar

Geri
Üst