[معاند الحظ]

وعليك السلام  ورحمة الله وبركاته 
اخوي انا جربت الكود طبعا بعد التعديل ولم تواجهني المشكلة التي عندك
وبصراحة يجب ان ترفق الكود الذي تستخدمه  والحدث الذي ينطلق منه تنفيذ الكود بالاضافة الى ارفاق ملف قاعدة بيانات مصغرة للتي عندك
لان عدم التطابق في الكثير من الاشياء تجعل من الصعب اعطائك جواب صحيح ودقيق


عموما انا عدلت الكود وهو يعمل معي بشكل ممتاز واقترح عليك تجربه  وتخبرني بالنتيجة

كود :

 Dim intCount2 As Integer
    Dim intCell2 As Integer

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        If intCount2 > 0 Then
            intCount2 = 0
        End If

        DataGridView1.MultiSelect = False
        DataGridView1.Rows(intCount2).Selected = True
        DataGridView1.Rows(intCount2).Selected = False
        DataGridView1.MultiSelect = True

        For Each myRow As DataGridViewRow In DataGridView1.Rows

            For Each myCell As DataGridViewCell In myRow.Cells

                Try
                    If myCell.Value.ToString = TextBox2.Text Then

                        DataGridView1.Rows(intCount2).Selected = True

                    End If

                Catch ex As Exception

                End Try

                intCell2 += 1

            Next

            intCount2 += 1

        Next



    End Sub