Bonjour;
Comment relier "trouvecellule" avec "CommandButton5_Click" exemple suivant :
Dim lign As Byte, col As Byte, y As Byte
*********************************
Private Sub CommandButton5_Click()
Dim x As Byte
If Not IsNumeric(TextBox1) Or TextBox1 = "" Then Exit Sub
If y +...