جستجو در فرم بر اساس دو شرط

[Nima]

با سلام

تو فایل نمونه می خوایم اطلاعات بر اساس دو شرط( که مقادیر تکست باکس یک و دو می باشند) در لیست باکس نمایش داده بشه.اما مشکل اینه که وقتی یکی از شروط هم برقراره اطلاعات نمایش داده میشه.

می خوایم یه کاری بکنیم که فقط وقتی هر دو شرط درست بود لیست باکس اطلاعات نمایش بده.

با تشکرنمونه

[alisabet]

RE: جستجو در فرم بر اساس دو شرط

با سلام

تو فایل نمونه می خوایم اطلاعات بر اساس دو شرط( که مقادیر تکست باکس یک و دو می باشند) در لیست باکس نمایش داده بشه.اما مشکل اینه که وقتی یکی از شروط هم برقراره اطلاعات نمایش داده میشه.

می خوایم یه کاری بکنیم که فقط وقتی هر دو شرط درست بود لیست باکس اطلاعات نمایش بده.

با تشکرنمونه

كد search را اينطوري اصلاح كن درست ميشه

Private Sub CommandButton1_Click()

For Each a In Sheet2.Range("b2:b10")
For Each b In Sheet2.Range("c2:c10")
If TextBox1.Text = a.Value And TextBox2.Text = b.Value Then
If a.Row = b.Row Then
ListBox1.AddItem a.Offset.Value
For i = 0 To 4
ListBox1.List(ListBox1.ListCount - 1, i) = a.Offset(0, i).Value
Next i
End If
End If
Next
Next


End Sub

[EBRAHIMSASANI]

RE: جستجو در فرم بر اساس دو شرط

با سلام

دوست گرامی کد ارائه شده توسط جناب آقای ثابت فقط می تواند جستجو را بر اساس اطلاعات مربوط به دو ستون b و c انجام دهد حال فرض کنید که می خواهید جستجویتان بر اساس ستون amount باشد که با کد فوق نمی توانید جستجو را انجام دهید لذا برای داشتن یک موتور جستجوی کوچک و خوب در فرم باید امکان جستجو در کل ستونها فراهم باشد نمونه فرم آماده شده خدمت شما امید که مفید واقع شود