السلام عليكم ورحمة الله وبركاته مرحبا اخي الكريم الكود الجديد الآن يمكن التحكم بناتج البحث متاطبق وغير متاطابق (جزء من الاسم ) وذلك عن طريق المتغير chk ويمكن التحكم بقيمة المتغير كالتالي     chk = 0     غير متطابق     chk = 1     متطابق والان كود البحث كالتالي On Error Resume Next Dim mySqL As String Dim mySQLWhere As String Dim mySqLAnd As String Dim chk As Integer ' ÛíÑ ãÊØÇÈÞ ' chk = 0 ' ãÊÇØÇÈÞ chk