Comboboxlar seçilmeden kaydet yapmasın

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Merhaba.

-- Kod'un son tarafındaki Hsp.Range("B2").Select satırını silin.
-- Silinen bu satırın yerine; Combobox1="" : Combobox2="" şeklinde bir satır ekleyin.
-- Kod'un baş tarafındaki a = 1 & ..... satırının üstüne de; If Combobox1="" OR Combobox2="" Then Exit Sub şeklinde bir satır ekleyin.

Böylece kayıt yapıldıktan sonra Combobox içerikleri temizlenmiş olur,
bunlardan herhangi biri boş olduğunda da kayıt aşamasına geçilmez.

Bu nesneler bir userform üzerinde ise; UserForm_Initalize kodlarının End Sub satırından hemen önce
Combobox1="" : Combobox2=""
şeklinde bir satır ilavesi yapın.

Sorun yaşarsanız, nesne ve kodların içerisinde olduğu bir örnek belge yükleyin ki onun üzerinden kontrol yapılabilsin.

.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Geri
Üst