Icd Kod Arama Motoru

[kaanozcekici]

Arkadaşlar Selam

Ekteki Dosyayı bir inceleyip yardımcı olursanız memnun olurum ben işin içinden çıkamadım

 

[xxcell]

Örnek dosyanız ektedir. ama baya uzunmuş upload ederken farkettim :mrgreen:

 

[kaanozcekici]

Örnek dosyanız ektedir. ama baya uzunmuş upload ederken farkettim :mrgreen:

Teşekkür ederim ama olmadı kardeş çalıştıramadım mesela antibiyotik yazıyorum bulmuyor yada hipertansiyon yazıyorum bulmuyor oysa listede çok var tekrar bakar yardımcı olursan memnun olurum

bir ricam daha var bulunan kelimelerin başında satır numaraları var

$A$24= gibi bunlarda gözükmese iyi olur çünkü çalışanlar bunu kod sanarlar sıkıntı yaşarım

ilgine ve yardımlarına teşekkürler.

 

[xxcell]

Teşekkür ederim ama olmadı kardeş çalıştıramadım mesela antibiyotik yazıyorum bulmuyor yada hipertansiyon yazıyorum bulmuyor oysa listede çok var tekrar bakar yardımcı olursan memnun olurum

bir ricam daha var bulunan kelimelerin başında satır numaraları var

$A$24= gibi bunlarda gözükmese iyi olur çünkü çalışanlar bunu kod sanarlar sıkıntı yaşarım

ilgine ve yardımlarına teşekkürler.

Don't Panik !

İlk 4000 satıra bakıyor, Siz 40.000 satır veri girmişsiniz.

With Worksheets(1).Range("a7:G4000") satırını,
With Worksheets(1).Range("a7:G40000") olarak değiştirmelisiniz.

Eğer bulunan hücrelerin başına, hücre adresi yazılmasını istemiyorsanız;
Cells([m65536].End(xlUp).Row + 1, "m") = C.Address & "=" & C.Value satırını,
Cells([m65536].End(xlUp).Row + 1, "m") = C.Value olarak değiştirmelisiniz.

Kod gayet başarılı çalışıyor.

 

[kaanozcekici]

Don't Panik !

İlk 4000 satıra bakıyor, Siz 40.000 satır veri girmişsiniz.

With Worksheets(1).Range("a7:G4000") satırını,
With Worksheets(1).Range("a7:G40000") olarak değiştirmelisiniz.

Eğer bulunan hücrelerin başına, hücre adresi yazılmasını istemiyorsanız;
Cells([m65536].End(xlUp).Row + 1, "m") = C.Address & "=" & C.Value satırını,
Cells([m65536].End(xlUp).Row + 1, "m") = C.Value olarak değiştirmelisiniz.

Kod gayet başarılı çalışıyor.

-SEVGİLİ XXCEL
Sana Çok Teşekkür ederim . Eline Sağlık

Başarılarının devamı dileğilye..

Kaan

 

[xxcell]

Eğer sonuç hücrelerine tıklayınca, bulunan hücreye gitmesini istiyorsanız otomatik köprüde eklenebilir.Ama bu, köprü sayısı belirli bir sayıyı aştığında baya bir yavaşlık yapacaktır.

veya sonuç hücrelerine çift clickleyince kaynak hücreye yönlendiren basit bir makroda yapılabilir.

Tabi böyle birşeye ihtiyac duyup duymadığınız önemli.

 

[kaanozcekici]

Eğer sonuç hücrelerine tıklayınca, bulunan hücreye gitmesini istiyorsanız otomatik köprüde eklenebilir.Ama bu, köprü sayısı belirli bir sayıyı aştığında baya bir yavaşlık yapacaktır.

veya sonuç hücrelerine çift clickleyince kaynak hücreye yönlendiren basit bir makroda yapılabilir.

Tabi böyle birşeye ihtiyac duyup duymadığınız önemli.

bahsettiğiniz olayı zaten soracaktım ama inanın çekindim yardımcı olurmusunuz

 

[xxcell]

bahsettiğiniz olayı zaten soracaktım ama inanın çekindim yardımcı olurmusunuz

2 türlü link ekledim, ekli dosyayı inceleyiniz.