Ara_Bul

[osmanli2]

ekli kitapdaki sayfa içinde b2 hücresine gidiğim rakamın listededen bularak renklendiren aynı zamanda bulunan değerin f2 hücresinde 3 saniye yanıp sönen yada 3 saniye sonra silinen, girilen değer yok ise uyarı mesajı veren kodlara ihtiyacım var.
ayrıntılı açıklama ekli sayfa da mevcut. yardımlarını bekliyorum tşk.ler

 

[osmanli2]

lütfen yardımcı olacak üstadlarım yokmu?

 

[dEdE]

Merhaba,
Ekli dosyayı inceler misiniz?

 

[osmanli2]

sayın dEdE, denedim fakat b2 hücresine girdiğim her değer için "aranan değer listede bulunamadı" mesajı veriyor.Kontrol edebilirmisiniz

 

[dEdE]

Merhaba,
Aşağıdaki satırı

Set bul = Range("h7:iv1000").Find([b2].Value, , , xlWhole)

bununla değiştirir misiniz?

Set bul = Range("h7:iv1000").Find([b2].Value, , xlValues, xlWhole)

 

[osmanli2]

teşekkürler hocam sanırım sorun yok. eline sağlık, emeğine saygılar.

 

[dEdE]

Rica ederim.
İyi akşamlar.