arama butonu ARA-BUL

[asuzen]

Evren Bey,
dosyalar sanırım silinmiş, hücrede bulunan kelimelerin bir kısmınıda aratailceğimiz ve sayfa seçimli veya tümünü seçebildiğimiz dosyayı tekrar ekleyebilir misiniz.

Mesajından bir önceki mesajda link var oraya tıkla. Orada 2 farklı versiyonu var senin aradığın sonu 59 la biten.

 

[akmes]

link çalışmıyor.

 

[akmes]

Tamamdır arka sayfada varmış.Teşekkürler

 

[conquistatore]

Yeni üyeyim

Yeni üyeyim ve burda yayınlana hiç bir dosyayı indiremiyorum neden acaba?

 

[conquistatore]

ARA_BUL2.xls dosyasını indiremiyorum link bozulmuş sanırım

 

[conquistatore]

ARA_BUL2.xls

ARA_BUL2.xls dosyasını indiremiyorum. Excell de arabul butonu yaparak arama yaptırmanın yöntemini detaylı anlatabilirmisiniz?

 

[Mahir64]

Mesaj #49 da ARA BUL 59 Dosyası Mevcut

 

[conquistatore]

Black Lord kardeşim neden bu dosyayı ben bulamıyorum mesaj Mesaj #49 diye de arama butonuyla arattım bulamadım bu Mesaj #49 a nasıl gideceğim hiç bir türlü bulamıyorum baştan sona kadar tüm linkleri kontrol ettim bana burdan linkini yazarsanız sevinirim.

 

[Mahir64]

Black Lord kardeşim neden bu dosyayı ben bulamıyorum mesaj Mesaj #49 diye de arama butonuyla arattım bulamadım bu Mesaj #49 a nasıl gideceğim hiç bir türlü bulamıyorum baştan sona kadar tüm linkleri kontrol ettim bana burdan linkini yazarsanız sevinirim.

Bu başlıktaki Mesaj #49
Ben elimde olanı ekleyeyim. Çalışma Evren beyindir.

 

[conquistatore]

Çok teşekkür ederim çalışan bir link bu sitede bulmama yardımcı olduğunuz için... Çok faydalı oldu...

 

[KONYA42]

Syn Evren Gizlen'e teşekür ederim.Güzel bir çalışma olmuş.Çok işime yaradı.

 

[tetik_23]

Iyi çalışmalar arkadaşlar
ekdeki oluşturmuş oldugum tabloda 26 tane sekme var ben ana sayfa die oluşturdugum pencerede arama yaptıgım zaman bütün sekmelerdeki listelerde olan malzemeyi bana göstersin tüm sekme ve tüm sekmelerdeki hücrelerde,
yani ana sayfa sekmesinde arama yaptıgım zaman diger sekmeleride arasın ve malzemeyi göstersin
örnek: Anasayfa sekmesinde arama motorunda speed sensör dedigim zaman 1-26 e kadar diger tüm sekmelerin içeriginide arasın
ekledigim çalışmamda yapacagım
teşekkürler

 

[KONYA42]

Iyi çalışmalar arkadaşlar
ekdeki oluşturmuş oldugum tabloda 26 tane sekme var ben ana sayfa die oluşturdugum pencerede arama yaptıgım zaman bütün sekmelerdeki listelerde olan malzemeyi bana göstersin tüm sekme ve tüm sekmelerdeki hücrelerde,
yani ana sayfa sekmesinde arama yaptıgım zaman diger sekmeleride arasın ve malzemeyi göstersin
örnek: Anasayfa sekmesinde arama motorunda speed sensör dedigim zaman 1-26 e kadar diger tüm sekmelerin içeriginide arasın
ekledigim çalışmamda yapacagım
teşekkürler

Evren GİZLEN'in bir önceki sayfada ara-bul-5 isimli dosyası var.Ondan faydalanabilrsiniz.Çünkü bütün sekmelerde arıyor.

 

[Orion1]

Iyi çalışmalar arkadaşlar
ekdeki oluşturmuş oldugum tabloda 26 tane sekme var ben ana sayfa die oluşturdugum pencerede arama yaptıgım zaman bütün sekmelerdeki listelerde olan malzemeyi bana göstersin tüm sekme ve tüm sekmelerdeki hücrelerde,
yani ana sayfa sekmesinde arama yaptıgım zaman diger sekmeleride arasın ve malzemeyi göstersin
örnek: Anasayfa sekmesinde arama motorunda speed sensör dedigim zaman 1-26 e kadar diger tüm sekmelerin içeriginide arasın
ekledigim çalışmamda yapacagım
teşekkürler

Örnek dosyanızı ekleyerek dosya üzerinde gerekli açıklamaları yapınız.

 

[EKREM1661]

Değerli hocamız Evren Bey..! yeni konu açmıyorum. Ekte kullandığım ara-bul örneği tek sütunda sondan başa doğru son satırdan (son güncel veriden) başlayarak arama yapıyor. Bu ilaveyi zamanın birinde sizden almıştım..Ancak; o zaman size ifade etmediğim bir noksanlık varr..
cümlenin tamamını yazınca ancak buluyor. Örneğin iki kelimelik bir cümlenin tek kelimesini yazarsan bulamıyor. Bunu düzeltirsek daha kullanışlı olacak..

 

[KONYA42]

Mrb. arkadaşlar,Syn Evren GİZLEN'in yaptığı eserde (Arabul 5_59),istediğimiz 2 sayfayı hariç tutamazmıyız.Daha detaylı anlatayım.Benim 40-50 sayfam var.Ama içlerinde 2 sayfayı("ANA SAYFA" ve "VERİ") hiç aramasın istiyorum.Hepsini seç tik'ini işaretlediğim zaman diğer bütün sayfalarda arasın.O 2 sayfada aramasın vede listelemede göstermesin.Sayfaları tek tek seçsem 40-50 sayfayı seçmek zaman alır.

 

[KONYA42]

Syn Evren GİZLEN'in userform kodlarının olduğu yere ............................................................................................................................................If Worksheets(syf).Name = "Sayfa1" Or Worksheets(syf).Name = "VERİ" Or Worksheets(syf).Name = "KOPYA" Then GoTo ATLA
.........................................................................................................................
........................................................................................................................
ATLA:
..........................................................................................................
..........................................................................................................
kodlarını ekledim.Veri ve KOPYA sayfalaroda arama yapmıyor.

 

[imrecep]

herkese merhaba,

çalışma çok faydalı çok teşekür ederiz,

fakat ben bu verilen dosya üzerinde değişiklik yapamıyorum,
mesela arama ekranındaki bilgiler; evren gizlen vs.
(önceki mesajlarda belirtilenleri uygulamaya çalıştım fakat bahsedilen şeyler bende görünmüyor.

excel 2007 kullanıyorum
saygılar

 

[KONYA42]

Mrb,Sayfanın kod kısmını açın.Sol tarafataki UsrForm1 üzerine tıklayın.F4 tuşuna basın.Sol taraftaki pencere açılacak.Orada Caption yazan yere istediğinizi yazın.Örneğin;BUL,ARA BUL vs).Değişecektir.

 

[b_balban]

Merhaba Arkadaşlar,

b2 hücresinden başlayacak şekilde arama yaptırmak istiyorum aşağıdaki kodu buna göre nasıl ayarlarız.

Private Sub textbox2_change()
For z = 1 To 3 'Sayfa sayısı kadar
For i = 2 To 200 'satır sayısı kadar
If (TextBox2.Text) = Sheets(z).Cells(i, 1) Then
TextBox1.Text = Sheets(z).Cells(i, 1).Offset(0, 1)
TextBox3.Text = Sheets(z).Cells(i, 1).Offset(0, 2)
TextBox4.Text = Sheets(z).Cells(i, 1).Offset(0, 3)
TextBox5.Text = Sheets(z).Cells(i, 1).Offset(0, 4)
TextBox6.Text = Sheets(z).Cells(i, 1).Offset(0, 5)
TextBox7.Text = Sheets(z).Cells(i, 1).Offset(0, 6)
TextBox8.Text = Sheets(z).Cells(i, 1).Offset(0, 7)
TextBox9.Text = Sheets(z).Cells(i, 1).Offset(0, 8)
TextBox10.Text = Sheets(z).Cells(i, 1).Offset(0, 9)
TextBox11.Text = Sheets(z).Cells(i, 1).Offset(0, 10)
TextBox12.Text = Sheets(z).Cells(i, 1).Offset(0, 11)
TextBox13.Text = Sheets(z).Cells(i, 1).Offset(0, 12)
TextBox14.Text = Sheets(z).Cells(i, 1).Offset(0, 13)
TextBox15.Text = Sheets(z).Cells(i, 1).Offset(0, 14)
TextBox16.Text = Sheets(z).Cells(i, 1).Offset(0, 15)

End If
Next i
Next z
End Sub