Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

macro limite de saisie a 3 caracteres

  • Initiateur de la discussion Initiateur de la discussion GHISLAIN
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

GHISLAIN

XLDnaute Impliqué
bonjour a tous


je cherche une formule qui controle la saisie sur des cellules

je voudrais avoir un message lors de la saisie inferieure ou superieure a 3 caracteres sur les cellules non vides de la ligne c4 à ap4

If Not Application.Intersect(Target, Range("C4:Ap4")) Is Nothing Then
If Target <> "" Then
If Len(Target <> 4) Then
MsgBox "NOMBRE DE CARACTERES MAXI MINI EST DE 3", vbExclamation
Target.ClearContents
Target.Select
End If
End If

j'essai avec cette formule qui me met le message tout le temps meme si je saisie 3 caracteres

Nb je souhaite utiliser une macro mes cellules contiennent des listes de validation


merci a tous de votre aide


amicalement

ghislain
 
Re : macro limite de saisie a 3 caracteres

bonjour
essai comme ceci

Code:
If Not Application.Intersect(Target, Range("C4:Ap4")) Is Nothing Then
If Target <> "" Then
V$ = Target.Value: V$ = Replace(V$, " ", "")
If Len(V$ )<> 3 Then
MsgBox "NOMBRE DE CARACTERES EXCLUSIVEMENT 3", vbExclamation
Target.ClearContents
Target.Select
End If
End If
End If

Roland
 
Dernière édition:
Re : macro limite de saisie a 3 caracteres

Bonjour ROLAND M

je viens de recuperer ta proposition de code que j'ai testé et qui fonctionne parfaitement

je te remercie d'etre passé sur mon fil et de m'avoir dépanné


amicalement


ghislain
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
14
Affichages
484
Réponses
14
Affichages
704
Réponses
3
Affichages
879
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…