Bonjour à tous, j'ai un petit soucis pour faire marcher une boucle If et la détection d'une cellule vide.
J'ai deux colonnes:
- une avec les numéros d'instructions
- l'autre avec le nom de l'instruction correspondante
Ma boucle If doit vérifier si la cellule correspondante au nom de l'instruction est vide:
- si oui le fond de la case doit se colorer (en vert il me semble dans mon cas)
- si non afficher le nom de l'instruction via la boite de dialogue
Mon problème: il ne me détecte jamais la cellule vide et m'affiche toujours la boite de dialogue avec le nom de l'instruction si la cellule n'est pas vide, ou avec rien du tout si elle est vide.
Voici mon code:
Si quelqu'un saurai m'aider je suis preneur !
Merci
J'ai deux colonnes:
- une avec les numéros d'instructions
- l'autre avec le nom de l'instruction correspondante
Ma boucle If doit vérifier si la cellule correspondante au nom de l'instruction est vide:
- si oui le fond de la case doit se colorer (en vert il me semble dans mon cas)
- si non afficher le nom de l'instruction via la boite de dialogue
Mon problème: il ne me détecte jamais la cellule vide et m'affiche toujours la boite de dialogue avec le nom de l'instruction si la cellule n'est pas vide, ou avec rien du tout si elle est vide.
Voici mon code:
Code:
Sub numero_nouvelle_instruction()
'déclaration des variables
Dim n°_instruction As Integer
Dim nom_instruction As String
n°_instruction = Cells(1, 4)
nom_instruction = Cells(6, 5)
If IsEmpty("nom_instruction") Then
Range("nom_instruction").Interior.Color = 4
Else: MsgBox nom_instruction & " "
End If
End Sub
Si quelqu'un saurai m'aider je suis preneur !
Merci