Sélection d'une cellule dans code vba
Bonjour à tous
Je cherche à ajouter une partie de code pour sélectionner la cellule B12 si le nom contenu dans la cellule n'est pas trouvé dans la plage E6 à E46. Si le texte est trouvé tout se passe bien.
Merci pour votre aide.
Code:
1 2 3 4 5 6 7
| Sub RJNomEquipe1()
Dim i As Integer
For i = 6 To 46 Step 1
If Range("E" & i).Value = Range("B12").Value Then Range("E" & i).Select Else
If Range("B12").Value = "" Then Range("D46").End(xlUp).Offset(1, 0).Select Else
Next
End Sub |