• DİKKAT

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

Satırları silerken Açılan Menüleri siliyor

htsumer

Altın Üye
Altın Üye
Katılım
7 Eylül 2004
Mesajlar
975
Excel Vers. ve Dili
Excel-2003
Aşağıdaki kod satırları siliyor. Tümünü sildiğinde önce bulunan ve tanımlanan Veri Doğrulamayı da siliyor. Silindikten sonra Bu açılır butonlar kayboluyor. Bunu nasıl engelleriz.

PHP:
Sub tumunuSil()
Dim Bolge As Range

If MsgBox("Sayfadaki öğretmenlere ait tüm bilgiler silinecek." & vbLf & _
    vbLf & "Onaylıyor musunuz?" & vbLf & vbLf & vbLf & _
    "UYARI: Silinen bilgiler geri alınamayacağından, bu işlemden önce çalışma kitabını kaydetmeniz veya yedeklemeniz önerilir.", vbYesNo + vbCritical, "Tümünü sil") = vbYes Then
    Set Bolge = Range(Range("A3:H3"), Range("H3").End(xlDown))
    Bolge.EntireRow.Delete
    MsgBox "Tüm bilgiler başarıyla silindi." & vbLf & vbLf & "NOT: Bu işlemi yanlışlıkla yaptıysanız, çalışma kitabını kaydetmeden kapatıp, tekrar açın.", , "Tümünü sil"
End If
End Sub
223268
 
bende hata vermedi halen daha datavalidation devam ediyor, örnek dosya verirseniz daha iyi olacaktır
 
Tamam bende de düzeldi teknik bir hata yapmışım. K.Bakmayın
 
estağfurullah kolay gelsin
 
Geri
Üst