PDA

View Full Version : سرچ در فایل اکسل



فاطمه وطن دوست
شنبه 25 خرداد 1387, 15:17 عصر
سلام

امکان سرچ تو فایله اکسل برای پیدا کردن یه مقدار هست ؟

___بر اساس یه پارامتر ____

ramsess
شنبه 25 خرداد 1387, 19:11 عصر
سلام خسته نباشید راستی خیلی شما زحمت کشیدید ولی ستاب من درست نشد که نشد
. در مورد سوالتون نمی دونم درست متوجه شدم یا نه
ببین این بدردت می خوره :
Private Sub Command6_Click()
Data1.Recordset.FindFirst "nameketab='" & Text1.Text & "'"
If Data1.Recordset.NoMatch = True Then
MsgBox (" موجود نيست!")
End If
Do While Data1.Recordset.NoMatch = False
MsgBox (" يافت شد")
Exit Do
Data1.Recordset.FindNext "nameketab='" & Text1.Text & "'"
Loop
End Sub

فاطمه وطن دوست
شنبه 25 خرداد 1387, 19:23 عصر
[QUOTE=ramsess;536722]سلام خسته نباشید راستی خیلی شما زحمت کشیدید ولی ستاب من درست نشد که نشد
. در مورد سوالتون نمی دونم درست متوجه شدم یا نه
ببین این بدردت می خوره :


Private Sub Command6_Click()
Data1.Recordset.FindFirst "nameketab='" & Text1.Text & "'"
If Data1.Recordset.NoMatch = True Then
MsgBox (" موجود نيست!")
End If
Do While Data1.Recordset.NoMatch = False
MsgBox (" يافت شد")
Exit Do
Data1.Recordset.FindNext "nameketab='" & Text1.Text & "'"
Loop
End Sub[/QUOTE

سلام
خواهش میکنم . :لبخندساده:

من تو اکسل میخوام :لبخندساده:

mehdad.koulab
شنبه 25 خرداد 1387, 20:53 عصر
سلام خانم وطن دوست منظورتون رو متوجه نشدم ولی اگه از Find خود اکسل استفاده کنین فکر کنم به نتیجه برسین.