25/04/2021, 19:17
25/04/2021, 19:17
25/04/2021, 19:43
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
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
If ComboBox_FirmaUnvani.Tag = "" Or TextBox_ID.Value = "" Then
25/04/2021, 20:08
.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 edilebilir25/04/2021, 20:40
(25/04/2021, 20:08)berduş yazdı: [ -> ]O benimde aklımdaydı.Mesajda yazdığım gibi düşüncemi söyledim abey.benim kastettiğim burada tag boş olduğunda silme işlemi iptal edilebilir.Unprotect "171717"
.Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete
ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır
.Protect "171717"
Artık oğuz abey hangisini kullanırsa seçim onun.
(25/04/2021, 20:08)berduş yazdı: [ -> ]Ekledim gifte gösterdim ilkinde yine olmuyor ikici de bos mesaj veriyor.benim kastettiğim burada tag boş olduğunda silme işlemi iptal edilebilir.Unprotect "171717"
.Rows(ComboBox_FirmaUnvani.Tag).EntireRow.Delete
ComboBox_FirmaUnvani.Tag=""'<==eklenmesi gereken satır
.Protect "171717"
25/04/2021, 21:01
.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.
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.
25/04/2021, 21:19
5.mesajdakini kullanın bence abey.