Veri Doğrulama Üçlü Tekrarsız-Yardım

[mekist]

Merhaba,

Tekrarsız üçlü doğrulama yapmak istiyorum, Tek bir satırda yapılan örnekleri var fakat tablo halinde olanını bulamadım,
Örnek dosyayı ekte paylaşıyorum yardımcı olabilir misiniz.

http://s3.dosya.tc/server17/v7mfw3/Tekrarsiz_uclu_dogrulama.xlsx.html

 

[mekist]

yardımcı olabilecek üstad var mıdır

 

[Asri]

Merhaba,

Tekrarsız üçlü doğrulama yapmak istiyorum, Tek bir satırda yapılan örnekleri var fakat tablo halinde olanını bulamadım,
Örnek dosyayı ekte paylaşıyorum yardımcı olabilir misiniz.

http://s3.dosya.tc/server17/v7mfw3/Tekrarsiz_uclu_dogrulama.xlsx.html

Tekrarsız üçlü doğrulama ne demek?
Örnek dosya var ama açıklama yok.
Detaylı bir açıklama yazar mısınız? Şu şu kolondaki değerleri şu kurala göre şurada şu şekilde sıralanmalı gibi.

 

[mekist]

Açıklama eksik kalmış olabilir,
Temel olarak veri doğrulama yapmak istiyorum,
Ekte bulduğum bir örnek var, Bölge seçilince iller tekrar olarak geliyor,
Örneğin Ege seçilince izmir birden fazla geliyor,
İlleri tek olarak nasıl getirebiliriz.

 

[Asri]

* Kategori, marka, üretici sırası ile seçilmelidir.
* Bir üst satırda boş hücre var ise alt satıra bilgi girişi yapılamaz.
* Herhangi bir satır çift tıklandığında ilgili satırı siler.
* useform kullanılmamıştır.
* Kullanıcı veri doğrulamalı hücreleri silse bile program uyarı ve düzenleme yapmaktadır.
* Kullanıcı veri doğrulamasız giriş yapmak istediğin program kabul etmez ve uyarı verir.

 

[mekist]

Teşekkür ederim üstad,
Diğer illeri seçince ilgili ilin ilçeleri gelmiyor,

 

[Asri]

Teşekkür ederim üstad,
Diğer illeri seçince ilgili ilin ilçeleri gelmiyor,

Bir sorun göremedim. Excel de makroların etkin olması gerekiyor.
5. Satırda KONYA, AKÖREN, TÜLCE seçimleri geldi.

 

[halit3]

Alternatif olarak userform ile yapılmış dosya
userformda 3 adet combobox ve bir adet commadbutton ekleyiniz.

Private Sub ComboBox1_Click()

ComboBox2.Clear
For j = 2 To Worksheets("İller").Cells(Rows.Count, 3).End(3).Row
If Worksheets("İller").Cells(j, 3).Value = ComboBox1.Text Then
ComboBox2.AddItem Worksheets("İller").Cells(j, 4).Value
End If
Next j
ComboBox2.Text = ComboBox2.List(0)

End Sub

Private Sub ComboBox2_Click()
ComboBox3.Clear
i = ComboBox2.ListIndex + 2

For j = 2 To Worksheets("İller").Cells(Rows.Count, 6).End(3).Row
If Worksheets("İller").Cells(j, 7).Value = ComboBox2.Text Then
ComboBox3.AddItem Worksheets("İller").Cells(j, 8).Value
End If
Next j

ComboBox3.Text = ComboBox3.List(ComboBox2.ListIndex)

End Sub

Private Sub CommandButton1_Click()

Set s1 = Sheets("Data")

sat = s1.Cells(Rows.Count, "b").End(3).Row + 1
s1.Cells(sat, 2).Value = ComboBox1.Text
s1.Cells(sat, 3).Value = ComboBox2.Text
s1.Cells(sat, 4).Value = ComboBox3.Text

End Sub

Private Sub UserForm_Initialize()
ComboBox1.Clear

Set s1 = Sheets("İller")
For j = 2 To s1.Cells(Rows.Count, "A").End(3).Row
ComboBox1.AddItem s1.Cells(j, "A")
Next j
ComboBox1.Text = ComboBox1.List(0)
ComboBox1_Click
End Sub

 

[mekist]

asri ve halit3 çok teşekkür ederim,her ikisi de süper olmuş, elinize sağlık

 

[halit3]

asri ve halit3 çok teşekkür ederim,her ikisi de süper olmuş, elinize sağlık

Teşekkürler iyi çalışmalar

 

[mekist]

Merhaba,
Dosyada bazı iyileştirmeler için yardımınıza ihtiyacım var, yardımcı olabilir misiniz,
- Marka birden fazla kategoride varsa marka seçildiğinde üretici seçiminde hata veriyor, Örneğin bisküvi kategorisinde cici markasını seçince hata alıyor,
-Üretici isimleri tekrarlı olarak birden fazla geliyor
-Hatalı girilen faturanın "fatura sıra no" yazarak hücrelerden silmek istiyorum, Aynı fatura numarasını 2 satırda olabilir ikisini de silmeli
-Tüm alanlar dolmadan aktar butonu aktarmayıp uyarı verebilir mi

 

[Asri]

Merhaba,
Dosyada bazı iyileştirmeler için yardımınıza ihtiyacım var, yardımcı olabilir misiniz,
- Marka birden fazla kategoride varsa marka seçildiğinde üretici seçiminde hata veriyor, Örneğin bisküvi kategorisinde cici markasını seçince hata alıyor,
-Üretici isimleri tekrarlı olarak birden fazla geliyor
-Hatalı girilen faturanın "fatura sıra no" yazarak hücrelerden silmek istiyorum, Aynı fatura numarasını 2 satırda olabilir ikisini de silmeli
-Tüm alanlar dolmadan aktar butonu aktarmayıp uyarı verebilir mi

Mesajımdaki kod ve dosya güncellendi.
Userform kullanılmadı.

 

[halit3]

Farklı bir uygulama ile yapıldı

 

[halit3]

13 nolu mesajdaki dosya yeniden güncellendi

 

[mekist]

Farklı bir uygulama ile yapıldı

 

[mekist]

Farklı bir uygulama ile yapıldı

Halit3 üstad çok teşekkür ederim,
yeni dosyada marka ve üreticilerin tümü geliyor, dosyayı dışardaki ekibe dolduracağımız için yanlış seçim yapabiliyorlar,
Bunu engellemek için Kategori=Marka=Üretici eşlemesi şeklinde seçim olması gerekiyor, Bu şekilde yapılabilir mi?
Kategori birden fazla üreticide olabiliyor, Marka da aynı şekilde birden fazla üreticide ve kategori de olabiliyor,

 

[mekist]

Mesajımdaki kod ve dosya güncellendi.
Userform kullanılmadı.

asri üstad teşekkür ederim,
Çalışma dosyasını dış ekibe gönderip veri doldurmasını isteyeceğiz, bu nedenle bir iki düzeltme ihtiyacı oldu,
Marka ve Üretici satırına listeden seçim haricinde giriş engellenebilir mi? ( Diğer satırları veri doğrulama ile engelledim)
Birde sayfada değişiklik yapmamaları için sayfayı koru dediğimde makro hata verdi, ( işlem yapılan satırlarda koruma yapmadım)

 

[halit3]

Halit3 üstad çok teşekkür ederim,
yeni dosyada marka ve üreticilerin tümü geliyor, dosyayı dışardaki ekibe dolduracağımız için yanlış seçim yapabiliyorlar,
Bunu engellemek için Kategori=Marka=Üretici eşlemesi şeklinde seçim olması gerekiyor, Bu şekilde yapılabilir mi?
Kategori birden fazla üreticide olabiliyor, Marka da aynı şekilde birden fazla üreticide ve kategori de olabiliyor,

Merhaba anlamak için yazıyorum ekli resimlerde E,F,G sutunlardaki verileri A,B,C sutunlarına benzersiz veriler yani teke düşen veriler bulunmakta bu şekilde bir şey işinize yaramıyormu.

Eğer buradaki resimlerdeki gibi veriler teke düşürme işinizi çözüyorsa A.B.C. sutunlarını baz alarak userform hazırlanır.

 

[mekist]

Merhaba anlamak için yazıyorum ekli resimlerde E,F,G sutunlardaki verileri A,B,C sutunlarına benzersiz veriler yani teke düşen veriler bulunmakta bu şekilde bir şey işinize yaramıyormu.

Eğer buradaki resimlerdeki gibi veriler teke düşürme işinizi çözüyorsa A.B.C. sutunlarını baz alarak userform hazırlanır.

Üstad,
Teke düşen veriler form doldururken hatalı doldurmaya neden olabiliyor,
Örneğin; Kategoride bisküvi seçilince bisküvi altındaki markalar gelsin, Marka seçiminde de Hero Baby seçilince bu markanın satıldığı iki üretici gelsin, (Okul kantini ve Samandıra Market)
Aynı markanın bebek maması altında satılan Mehmet Bakkal gelmesin.
Ek olarak Kategori seçtikten sonra Marka adları tek gelmeli, Hero Baby iki tane olduğu için filtreye iki satır olarak gelmemeli

 

[halit3]

Göndermiş olduğunuz dosya ekteki resim gibi

Örneğin; Kategoride bisküvi seçilince bisküvi altındaki markalar gelsin, Marka seçiminde de Hero Baby seçilince bu markanın satıldığı iki üretici gelsin, (Okul kantini ve Samandıra Market)
Aynı markanın bebek maması altında satılan Mehmet Bakkal gelmesin.
Ek olarak Kategori seçtikten sonra Marka adları tek gelmeli, Hero Baby iki tane olduğu için filtreye iki satır olarak gelmemeli

buradaki kategoride bisküvi seçince bisküvi altındaki markalar resimde hangileri