excelde arama motoru

[suren1903]

stok programına arama motoru tarzında bişe eklemek istiyorum makro yu fazla anlamadığım içinde yapamadım. örneğin ab yazdığımda ab yle başlayanları sıralasın tam adını yazınca sadece onu göstersin..

 

[Vedat Özer]

Selam,


Sıralama hangi sütuna göre yapılacak.

 

[suren1903]

malzeme adına göre olucak

 

[Vedat Özer]

Selam,


Dosyanıza bir adet Text Box ekledim,

Kodu;

Private Sub TextBox1_Change()
On Error Resume Next
NO = TextBox1.Value
Set FC2 = Range("B7:L65000").Find(What:=NO)
Application.Goto Reference:=Range(FC2.Address), _
   Scroll:=False
Selection.AutoFilter Field:=2, Criteria1:="*" & TextBox1.Value & "*"
If NO = "" Then
Selection.AutoFilter Field:=2
End If
End Sub

Dosyanız ekte.

 

[suren1903]

teşekkürler...

 

[suren1903]

malzeme adına göre olucaktı siz malzeme grup adına göre yapmışsınız müsaitseniz tekrar bi düzeltme yapabilirmisiniz...

 

[Vedat Özer]

Selam,

Dosyanızdan aşagıdaki işaretlediğim yerleri aşagıdaki şekilde yaparsanız düzelmiş olacaktır,

Sizde Biraz da olsa makrolara girmiş olursunuz,

Sayfa kod bölümündeki kodlar böyle olması lazım.

Private Sub TextBox1_Change()
On Error Resume Next
NO = TextBox1.Value
Set FC2 = Range("[B][COLOR="Blue"]G3:L65000[/COLOR][/B]").Find(What:=NO)
Application.Goto Reference:=Range(FC2.Address), _
   Scroll:=False
Selection.AutoFilter Field:=[B][COLOR="blue"]7[/COLOR][/B], Criteria1:="*" & TextBox1.Value & "*"
If NO = "" Then
Selection.AutoFilter Field:=[B][COLOR="blue"]7[/COLOR][/B]
End If
End Sub

 

[suren1903]

teşekkürler..

 

[melih3365]

Hocam benımde buna ıhtıyacım var size zahmet bu aramayı tek sütünda değilde tüm sayfada yapacak şekilde ayarlamanız mümkünmüdür.

 

[yhackup]

hocam aynı örnekten bende yaptım fakat benim farklı bi isteğim daha var ben faturalar ıcın kullanıyorum aramada bulunan isimlerin karşısında toplam kdv vs. yaızyor texbox karşısına bulunan isimlerin faturalarının toplamlarını yazdırabilirmiyim

 

[barthobel]

Konu baya eski ama içeriğinden istifade ettim. Ancak arama yapılacak alanda veri olarak sadece sayı yazıyorsa arama yapmıyor yanyana hem sayı hem harf varsa veya sadece harf varsa arama yapıyor. Bunu aynı zamanda sadece sayı varkende arama yapmasını nasıl sağlayabiliriz. şimdiden teşekkürler.