الف شكر
ممكن اسأل سؤال اخر بعد اذنك انا عندي مشكلة كبير في كود البحث بين تاريخين فهل هذا الكود مكتوب بطريقة صحيحة ام لا
لو حبيت اختار تاريخ من يوم الى يوم اخر يجلب لي تاريخ اخر يوم او قمت بالبحث من اول الشهر الى اخره لايفي بالغرض ايضا فما الحل
وانا متشكر لسيادتك جدا جدا بارك الله فيك واعزك
Me.TextBox1.Value = Format(Me.TextBox2.Value, "dd/mm/yyyy")
Me.ListBox1.Clear
For i = 2 To Application.WorksheetFunction.CountA(Sheet2.Range("a:a"))
If Sheet2.Cells(i, 1).Value >= CDate(TextBox1.Text) And Sheet2.Cells(i, 1).Value <= CDate(TextBox2.Text) Then