Untitled

'start button 2

        If Button2.Text = Button1.Text Or Button2.Text = Button3.Text Or Button2.Text = Button4.Text Then
            MsgBox("there is a mistake in row 1")
            Exit Sub

        End If

        If Button2.Text = Button6.Text Or Button2.Text = Button9.Text Or Button2.Text = Button13.Text Then
            MsgBox("there is a mistake in colum 1")
            Exit Sub

        End If

        If Button1.Text = Button2.Text Then
            MsgBox("there is a mistake in group 1")
            Exit Sub

        End If