Veri doğrulama, listede değişiklik

[mustafakaya132]

Bir hücreye liste seçeneğiyle veri doğrulama atıyorum fakat listede bir değişiklik yaptığımda eski haliyle kalıyor, çok sayıda atama yaptığım için tek tek değiştirme imkanım yok otomatik olarak nasıl değiştirebilirim?

 

[asi_kral]

Merhaba
Örnek dosya ekler misiniz_?
Deneme yapalım. Ayrıca siz ne yaptığınızda veri değişmiyor onunda net bilgisini verirseniz net cevaplar verebiliriz.

 

[mustafakaya132]

http://s3.dosya.tc/server16/mW0WKW/veridogrulama.xlsx.html


Örneğin B3 teki 1,6 değerini değiştirdiğimde doğrulamadaki önceden seçilmiş verilerinde değişmesini istiyorum.

ilginiz için teşekkürler

 

[asi_kral]

Merhaba
Sayfanın kod bölümüne kopyalayın ve deneyin.
B3:B10 aralığında çalışır.

Option Explicit
Dim KL As Variant
Private Sub Worksheet_Change(ByVal Target As Range)
Dim BUL As Range, SBT As Variant
On Error Resume Next
Application.EnableEvents = False
If Intersect(Target, Range("B3:B10")) Is Nothing Then _
Application.EnableEvents = True: Exit Sub
Set BUL = Range("E:E").Find(KL, , , xlPart)
If Not BUL Is Nothing Then
SBT = BUL.Address
Do
Cells(BUL.Row, "E") = Target.Value
Set BUL = Range("E:E").FindNext(BUL)
Loop While Not BUL Is Nothing And BUL.Address <> SBT
End If
Application.EnableEvents = True
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("B3:B10")) Is Nothing Then Exit Sub
KL = Target
End Sub

Not : Kitabı kaydederken makro içerebilen dosya şeklinde kayıt yapınız.

 

[mustafakaya132]

Dediğinizi yaptım çalışıyor çok teşekkürler, veri doğrulamayı farklı bir sayfada denedim değişmedi değerler bu konudada yardımcı olabilir misiniz

 

[asi_kral]

Dediğinizi yaptım çalışıyor çok teşekkürler, veri doğrulamayı farklı bir sayfada denedim değişmedi değerler bu konudada yardımcı olabilir misiniz

Kodu o sayfaya kopyalamanız gerekli
Kolay Gelsin.

 

[mustafakaya132]

hayır anlatamadım, veriler sayfa1 de kalıcak. sayfa2 deki doğrulamada değşiklik olmuyor

 

[asi_kral]

hayır anlatamadım, veriler sayfa1 de kalıcak. sayfa2 deki doğrulamada değşiklik olmuyor

Kodu ona göre düzenlenmesi gerekli.
Dosyanızı güncelleyin kodu güncelliyelim.

 

[mustafakaya132]

http://www.dosya.tc/server22/RrnMX4/veridogrulama.xlsx.html

sayfa1 deki değişiklikler sayfa2 de gerçekleşirse sorun hallolmuş olucak, baştan eksik sordum kusura bakmayın
teşekkürler

 

[asi_kral]

Tam olarak istediğiniz nedir.
Zaten doğrulamayı yapmışsınız. Seçmeniz daha mantıklı tek satır için gerek yok kod yazmaya. Bence bir de şu var tek satıra hangi sayı yazılacak onu da belirtmemişsiniz.

 

[mustafakaya132]

Birçok çeşit ürünün maliyet hesabını yaptığım bir dosyam var, ana sayfadaki verilerimi diğer sayfalarda kullanıyorum.
sayfa1 deki değerleri değiştirdiğim zaman diğer sayfalardaki doğrulamalar sabit kalıyor(örneğin sayfa1 deki maliyeti 15 olan bir değişkeni 16 ya çevirdiğimde, diğer sayfalardaki doğrulamada seçilmiş 15 değişmiyor) ilk yolladığınız koddaki gibi değişmesini istiyorum. Yazarak anlatmak zormuş gerçekten, anlayışınız için teşekkürler

 

[asi_kral]

Birçok çeşit ürünün maliyet hesabını yaptığım bir dosyam var, ana sayfadaki verilerimi diğer sayfalarda kullanıyorum.
sayfa1 deki değerleri değiştirdiğim zaman diğer sayfalardaki doğrulamalar sabit kalıyor(örneğin sayfa1 deki maliyeti 15 olan bir değişkeni 16 ya çevirdiğimde, diğer sayfalardaki doğrulamada seçilmiş 15 değişmiyor) ilk yolladığınız koddaki gibi değişmesini istiyorum. Yazarak anlatmak zormuş gerçekten, anlayışınız için teşekkürler

Merhaba
Sayfa2 de zaten tek satırda işlem yapılıyor bunun için kod yazmaya gerek yok anlatabiliyor muyum. Ana sayfadaki veriyi değiştirdiğinizde sayfa2'de veri doğrulamadan seçmeniz daha mantıklı.
Diğer şekilde istediğiniz nasıl olacak. İlk istediğiniz ile son istediğinizin arasında fark var. İlkinde belli kıstası arayıp değiştiriyordu. Son istediğinizde ise arama yapmayacak neyi değiştirecek tek hücredeki bilgiyi mi değiştirecek yani.

 

[Merhum İdris SERDAR]

Birçok çeşit ürünün maliyet hesabını yaptığım bir dosyam var, ana sayfadaki verilerimi diğer sayfalarda kullanıyorum.
sayfa1 deki değerleri değiştirdiğim zaman diğer sayfalardaki doğrulamalar sabit kalıyor(örneğin sayfa1 deki maliyeti 15 olan bir değişkeni 16 ya çevirdiğimde, diğer sayfalardaki doğrulamada seçilmiş 15 değişmiyor) ilk yolladığınız koddaki gibi değişmesini istiyorum. Yazarak anlatmak zormuş gerçekten, anlayışınız için teşekkürler

.

1. Sayfa1'de fiyat diye ad tanımlaması yapın (Yapmışsınız zaten.)

2. Sayfa2'de E9'dan başlamak üzere, fiyat alanına bağlı olarak veri doğrulama listei yapın. (Bunu da yapmışsınız.)

3. Sayfa2'nin kod bölümüne aşağıdaki kodları yazınız.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim hcr As Range
Dim Num As Long

For Each hcr In Intersect(Target, Range("E9:E20"))
    If hcr <> "" Then
        Application.EnableEvents = False
        Num = Application.WorksheetFunction.Match(hcr, _
                            Sheets("Sayfa1").Range("fiyat"), 0)
        If Num <> 0 Then hcr.Formula = "=INDEX(fiyat, " & Num & ")"
        Application.EnableEvents = True
    End If
Next hcr

End Sub

Sayfa1de fiyat alanında yaptığınız değişikliğe bağlı, Sayfa2'nin ilgili hücre/hücreleri güncellenecektir.

Örnek dosya ekte.

Ayrıca;

http://www.excel.web.tr/showthread.php?t=2830

15 No'lu mesaja bakınız.

.

.


.

 

[mustafakaya132]

asi_kral; iki sorum arasında sadece sayfaların farklılığı var, yazmış olduğunuz kod aynı sayfa içerisinde çalışıyor, ben diğer sayfalardada çalışmasını istiyorum.

yurttas; yollamış olduğunuz dosyada "indis" fonksiyonu ile doğru çalışmakta fakat, doğrulamadan farklı bir seçim yaptığımda indis fonksiyonu silinmekte ve ana sayfadaki fiyatlarda güncelleme yaptığımda (yazlık sayfasındaki)eski fiyatlar değişmiyor. Dosyayı güncelleyip daha anlaşılır bir hale getirmeye çalıştım bakarsanız çok memnun olurum.

 

[Merhum İdris SERDAR]

asi_kral; iki sorum arasında sadece sayfaların farklılığı var, yazmış olduğunuz kod aynı sayfa içerisinde çalışıyor, ben diğer sayfalardada çalışmasını istiyorum.

yurttas; yollamış olduğunuz dosyada "indis" fonksiyonu ile doğru çalışmakta fakat, doğrulamadan farklı bir seçim yaptığımda indis fonksiyonu silinmekte ve ana sayfadaki fiyatlarda güncelleme yaptığımda (yazlık sayfasındaki)eski fiyatlar değişmiyor. Dosyayı güncelleyip daha anlaşılır bir hale getirmeye çalıştım bakarsanız çok memnun olurum.

.

Nasıl yapıldığını yukarıda anlattım. Örnek Dosya ekledim. Ancak eklediğiniz dosyada kodları yazıp, gerekli uyarlamaları yapmamışsınız.



.

 

[mustafakaya132]

Dediklerinizi uygulayip denedim fakat dediğim gibi indis fonksiyonunu kullanamam çünkü doğrulamadan farkli değişkenleri seçmem gerekebiliyor. Seçim yaptigimda ise indis silinip yerine rakam geçiyor. Rakama dönüştükten sonra ana sayfadaki değişiklik sayfalara yansimaz hale geliyor. Asi_kralin yapmis oldugu olmuştu aslinda, sadece farkli bir sayfada çalismiyordu, ayni şekli sizin farkli örneklerinizdede gördüm.

 

[Merhum İdris SERDAR]

Dediklerinizi uygulayip denedim fakat dediğim gibi indis fonksiyonunu kullanamam çünkü doğrulamadan farkli değişkenleri seçmem gerekebiliyor. Seçim yaptigimda ise indis silinip yerine rakam geçiyor. Rakama dönüştükten sonra ana sayfadaki değişiklik sayfalara yansimaz hale geliyor. Asi_kralin yapmis oldugu olmuştu aslinda, sadece farkli bir sayfada çalismiyordu, ayni şekli sizin farkli örneklerinizdede gördüm.

.

Siz makro kodlarını yazmazsanız dediğiniz şekilde olur. Benim önerim örnekleri bir kez daha inceleyin.

Bir kez daha açıklayayım.

Verdiğim örnek dosyalarda,

1. Listede veri değiştirdiğinizde makro indis formülünü devreye sokarak, gerekli güncellemeyi yapıyor.

2. Sizin veri Doğrulama açılır listeniz yeni değerle birlikte yine çalışıyor.

İstediğiniz bu değil mi?

 

[mustafakaya132]

Dediklerinizi yaptım ama nerde yanlış yaptığımı bulamadım :frown:

 

[Merhum İdris SERDAR]

Dediklerinizi yaptım ama nerde yanlış yaptığımı bulamadım :frown:

.

Dosyanız ekte.

.

 

[mustafakaya132]

.

Dosyanız ekte.

.

yollamış olduğunuz dosyada "iplik" sayfasında değişiklik yaptığımda "yazlik" sayfasındaki veriler değişmekte fakat önce yazlık sayfasındaki doğrulamalardan başka bir seçim yaptığımda indis fonksiyonu siliniyor ve "iplik" sayfasındaki değişiklikleri algılamaz hala geliyor problemim tam olarak bu. Sabırla ilgilendiğiniz için teşekkür ederim