G
grégoire
Guest
Salut les XLDnautes
Comment obliger un utilisateur a ne saisir que 15 caractéres dans une cellule.
Comment obliger un utilisateur a ne saisir que 15 caractéres dans une cellule.
Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Target) > 15 Then
MsgBox ('Entrée non valide : 15 caractères maxi')
Target.Value = Left(Target, 15)
End If
End Sub