thomasdu40
XLDnaute Occasionnel
BOnjour,
Le code ci-après ne fonctionne pas. Il n'y a même pas de message d'erreur qui s'affiche.
Pourtant j'ai repris ce code sur un autre de mes enregistrements et il fonctionne sur cet autre enregistrement mais pas dans le nouveau. Bizarre, bizarre
Auriez-vous une solution ?
Le code ci-après ne fonctionne pas. Il n'y a même pas de message d'erreur qui s'affiche.
Pourtant j'ai repris ce code sur un autre de mes enregistrements et il fonctionne sur cet autre enregistrement mais pas dans le nouveau. Bizarre, bizarre
Auriez-vous une solution ?
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$22" Then
If UCase(Target.Value) = "Conso client" Then
MsgBox "Vous avez sélectionné Conso client, veuillez saisir le nom de l'enseigne société!", vbInformation, "Identification enseigne/société concerné"
End If
End If
End Sub