P
Picu
Guest
Bonjour au forum,
je tente de mettre en place l'évènement suivant sur une feuille, hélas lorsque je rentre une valeur dans une cellule contenant une formule, je me retrouve toujours avec la formule mais pas la valeur.
qu'est ce qui ne marche pas dans mon code ? je suis largué !
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.HasFormula = True Then
With Target.Interior
.ColorIndex = 15
End With
Else
With Target.Interior
.ColorIndex = 35
End With
End If
End Sub
Merci par avance.
Picu
je tente de mettre en place l'évènement suivant sur une feuille, hélas lorsque je rentre une valeur dans une cellule contenant une formule, je me retrouve toujours avec la formule mais pas la valeur.
qu'est ce qui ne marche pas dans mon code ? je suis largué !
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.HasFormula = True Then
With Target.Interior
.ColorIndex = 15
End With
Else
With Target.Interior
.ColorIndex = 35
End With
End If
End Sub
Merci par avance.
Picu