Barons
Altın Üye
- Katılım
- 14 Mayıs 2005
- Mesajlar
- 967
- Excel Vers. ve Dili
- Microsoft Ofis 365
- Altın Üyelik Bitiş Tarihi
- 06-01-2040
Merhaba
Aşağıdaki kod ile kapalı bir dosyadan arama yapıyorum..Ancak tam verim alamadım.Benzer veya yakın değerlerde çıkıyor.
Tam birebir arama nasıl yapabilirim.wholematch gibi bir şeyler vardı ama tam hatırlayamadım.Yardımlarınız için şimdiden teşekkürler
Kod :
TextBox2.Value = ""
Workbooks.Open ThisWorkbook.Path & "\EvrakGiris.xls"
Worksheets("sayfa1").Select
Range("j2:j65000").Find(TextBox1.Value).Activate
TextBox2.Value = ActiveCell.Offset(0, 5).Value
Workbooks("EvrakGiris.xls").Close True
Aşağıdaki kod ile kapalı bir dosyadan arama yapıyorum..Ancak tam verim alamadım.Benzer veya yakın değerlerde çıkıyor.
Tam birebir arama nasıl yapabilirim.wholematch gibi bir şeyler vardı ama tam hatırlayamadım.Yardımlarınız için şimdiden teşekkürler
Kod :
TextBox2.Value = ""
Workbooks.Open ThisWorkbook.Path & "\EvrakGiris.xls"
Worksheets("sayfa1").Select
Range("j2:j65000").Find(TextBox1.Value).Activate
TextBox2.Value = ActiveCell.Offset(0, 5).Value
Workbooks("EvrakGiris.xls").Close True