pouillette
XLDnaute Nouveau
Bonjour,
Je veux utiliser la mise en forme conditionnelle avec VBA, pour remplir les cellules.
Voici mon code :
Dim Ncol as long
Ncol = 10
If Cells(Nlig, 3) = "" Then Cells(5, Ncol) = ""
If Cells(5, Ncol) >= Cells(Nlig, 3) And Cells(5, Ncol) <= Cells(Nlig, 5) Then
Cells(5, Ncol) = "x"
Else
Cells(5, Ncol) = ""
End If
J'ai un message comme quoi il y a une erreur de definition de l'application ou de l'objet.
Nlig est deja defini et fonctionne.
Dans la ligne en bleue, Ncol = 0.
Pouvez vous m'aider s'il vous plait.
Pouillette
Je veux utiliser la mise en forme conditionnelle avec VBA, pour remplir les cellules.
Voici mon code :
Dim Ncol as long
Ncol = 10
If Cells(Nlig, 3) = "" Then Cells(5, Ncol) = ""
If Cells(5, Ncol) >= Cells(Nlig, 3) And Cells(5, Ncol) <= Cells(Nlig, 5) Then
Cells(5, Ncol) = "x"
Else
Cells(5, Ncol) = ""
End If
J'ai un message comme quoi il y a une erreur de definition de l'application ou de l'objet.
Nlig est deja defini et fonctionne.
Dans la ligne en bleue, Ncol = 0.
Pouvez vous m'aider s'il vous plait.
Pouillette