• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü veri doğrulama ile veri alma

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Sebahattin

Sebahattin

Gold Üye
Katılım
26 Kas 2022
Mesajlar
708
Çözümler
3
Aldığı beğeni
58
Excel V
Office 2013 TR
Gold Bitiş
15 Nisan 2026
Konu Sahibi
Selamun Ustatlar sayfamda veri girişinden veri doğrulama ile kurban listeleri sayfasının A8 sütununa veri almadayım oysa benim burada yapmak istediğim A8 sütununda bulunan veri A Sütuna tekrar aynı veri yazıldıgında kullanıcıya bilgi versin ve kaydı yapmasın kurban listesinde görüldüğü üzere A8 de 120 grup yazıldığına göre A15 sütununa 120.grup yazıldığı anda kullanıcıya bu bu gruptaki veri yapılmıştır mesajını vererek kayıt yapmasın bu soruya cevap vereceginizi umarak sizler ALLAH a emanet ediyor ve hayırlı geceler dilerim.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Çözüm
Refaz
Hocam düzenledim ve bazı kodlarıda kısalttım.
Başka konular açarken bu dosyadaki kodlara göre açın çünkü işler karışacak bir sürü mod kodlarıyla boş hücre dolu hücre kodları eklendi tekrar sıfırdan yazılmak zorunda kalınmasın.
Bu activate kodlarınıda pasif yaptım hata veriyordu açılışta proğram bitince başındaki tek tırnaklarıda kaldırırsınız.
Normalde B sütununa zayen veri doğrulama ile alınıyordu esasen.
Neyse denersiniz artık.
Tarihe göre sırala Oylara göre sırala
Merhaba sayın Sebahattin .
Öncedende defalarca yazdım size resimdeki tek tırnak olmayacak diye ama ısrarla aynı yolda yürüyorsunuz valla çok garip bir durum.
Kaldırmazsanız hata alırsınız zaten ve 'Sub Workbook_Activate() burayı alttaki gibi değiştirin bu zaten size son yazmam kendiniz artık bilirsiniz.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.

1.png
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Hocam ben o tırnak işaretini programı kullanırken kaldırıyorum bazan hucrelerde formulsel islemlemri yaptım için o tırnak işareti onun içindir
 
Olumlu oy 0 Negatif oyla
Sebahattin' Alıntı:
Hocam ben o tırnak işaretini programı kullanırken kaldırıyorum bazan hucrelerde formulsel islemlemri yaptım için o tırnak işareti onun içindir
Genişletmek için tıkla...
Orayı hatalı bir hale getirmek yerine içindekileri tek tırnak işaretine almak daha mantıklı gibi bence.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Hocam A sutununa kaydedilen veriyi tekrar kaydetmesin istiyoruz fakat sonuç örnek olarak A8 sütununda 1 grup verisi girildiği takdirde A15 tekrar aynı veri girişi yapilmiyacak ve kullanıcıya mesaj verecek
Bu arada A sutununa veri girilmedigi takdirde B sutununa veri girişi yapilmiyacak ve kullanıcıya lütfen grup no giriniz diye mesaj verecek. Bu konuda yardımlarınızı bekliyoruz
 
Olumlu oy 0 Negatif oyla
Tamam sonra bakarım goto sonSub tan önce target.value="" yazmayı unutmuşum tekrar bakınca eklediğim resime.
 
Olumlu oy 0 Negatif oyla
Sebahattin' Alıntı:
Hocam A sutununa kaydedilen veriyi tekrar kaydetmesin istiyoruz fakat sonuç örnek olarak A8 sütununda 1 grup verisi girildiği takdirde A15 tekrar aynı veri girişi yapilmiyacak ve kullanıcıya mesaj verecek
Genişletmek için tıkla...
Bunu zaten yapıyor sadece önceki mesajda yazdığım kod eklenecek yani aynı yazılırsa temizleyecek yazılanı.
 
Olumlu oy 0 Negatif oyla
Sebahattin' Alıntı:
Bu arada A sutununa veri girilmedigi takdirde B sutununa veri girişi yapilmiyacak ve kullanıcıya lütfen grup no giriniz diye mesaj verecek.
Genişletmek için tıkla...
Bu kısım kolay zaten B sütunu için kodlar var.
Orda
if target.offset(,-1).value = "" then
Msgbox "......."
target.value=""
goto sonSub
End if

Biraz uğraşın yapazsanız yarın bakarım.
 
Olumlu oy 0 Negatif oyla
Sebahattin' Alıntı:
hocam sonuc olumsuz
Genişletmek için tıkla...
Etra bazen resim atıyorumki resime bakıp yazarken birşey öğrenir üyeler diye.
Alttaki renkli olanı yazmayı unutmuşsunuz.Altındaki satırda aynı hata var.

If Not Intersect(Target, Range("A8:A2500")) Is Nothing Then
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
Konu Sahibi
selamun aleykum eklı olan dosyayı indirdim fakat hata aldım söyleki A8 sütununa grup no aldıktan sona b8 veri geliyor aynı zamanda b8 veriyi B9 satırına girdiğimde a sütununa veri girmeniz diye hata veriyor bu hata olmayacak ki küpe no girip isleme devam edebilerim ve ekran görüntüsünü ekte saygılar
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Evet denedim öyle olmuş.Ben Her grup için denemiştim ondan hata vermemişti.Düzenleyip eklerim.
 
Olumlu oy 0 Negatif oyla
Hocam düzenledim ve bazı kodlarıda kısalttım.
Başka konular açarken bu dosyadaki kodlara göre açın çünkü işler karışacak bir sürü mod kodlarıyla boş hücre dolu hücre kodları eklendi tekrar sıfırdan yazılmak zorunda kalınmasın.
Bu activate kodlarınıda pasif yaptım hata veriyordu açılışta proğram bitince başındaki tek tırnaklarıda kaldırırsınız.
Normalde B sütununa zayen veri doğrulama ile alınıyordu esasen.
Neyse denersiniz artık.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 1 Negatif oyla
Çözüm
Konu Sahibi
Hocam teşekkürler ediyorum ve sizleri Rabbime emanet ediyorum ve hayırlı geceler ve hayırlı işler temmenni ediyorum
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst