AccessTr.neT
Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. (/konu-excel-vba-ile-userform-uzerinden-kayit-silme-hakkinda.html)

Sayfalar: 1 2 3 4 5

RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - feraz - 25/04/2021

(25/04/2021, 18:51)berduş yazdı: Silme kodundan sonra .tag="" gibi boşaltma kodunun eklenmesi yeterli olmaz mi?
Sizce tag hangi durumlarda sorun çıkarabilir @feraz hocam?
Birazdan anlatayım abey.

RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - feraz - 25/04/2021

Abey gifi izlerseniz sanırım anlttığımı anlarsınız.
Combodan seçip sil yapınca siliyor.İkinci olarak combodan seçilmeyip sile basıncada son satırdaki boş satır noyu buluyor onun için demiştim aslında.
onun çözümü içinde alttaki kod ile değiştirilebilirdi 2.mesajdaki ilgili satır aslında ama içime kuşku düştü.
Yani alttaki kod ile değişincede sorun olmaz heralde.Birde bazen combolara tasarım modunda tag verilmek zorunda kalınıyor belki kod çalışınca özelliklerdende değiştirebilir diye düşündüm Img-grin

[Resim: zzz.gif]

If ComboBox_FirmaUnvani.Tag = "" Or TextBox_ID.Value = "" Then


RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - berduş - 25/04/2021 

        .Unprotect "171717"

        .Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete

        ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır

        .Protect "171717"
benim kastettiğim burada tag boş olduğunda silme işlemi iptal edilebilir

RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - feraz - 25/04/2021

(25/04/2021, 20:08)berduş yazdı: 
        .Unprotect "171717"

        .Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete

        ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır

        .Protect "171717"
benim kastettiğim burada tag boş olduğunda silme işlemi iptal edilebilir
O benimde aklımdaydı.Mesajda yazdığım gibi düşüncemi söyledim abey.
Artık oğuz abey hangisini kullanırsa seçim onun.
(25/04/2021, 20:08)berduş yazdı: 
        .Unprotect "171717"

        .Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete

        ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır

        .Protect "171717"
benim kastettiğim burada tag boş olduğunda silme işlemi iptal edilebilir
Ekledim gifte gösterdim ilkinde yine olmuyor ikici de bos mesaj veriyor.

[Resim: do.php?img=10957]

RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - Oğuz Türkyılmaz - 25/04/2021

.Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete
ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır

Bu şekilde düzenledim. Sadece combodan firma seçip işlem gerçekleştikten sonra boş user formda tekrar sil basınca boş formda sanki işlem yapmış gibi veriler silinecek mesajını veriyor ve boş formda sanki silme işlemi gerçeleştiriyor gibi davranış gösteriyor ve eğer tekrar boş formda 2.defa  sile basarsanız bu defa kayıt silinecek mesajını verdikten sonra kayıt bulunamadı mesajını veriyor. Kayıt bulunamadı mesajını form boşken Kayıt Sil butonuna ilk basışta da vermesini sağlayabilirsek daha iyi olur ama böylede kullanabilirim sorun yok.

RE: Excel Vba İle Userform Üzerinden Kayıt Silme Hakkında. - feraz - 25/04/2021

5.mesajdakini kullanın bence abey.