Bonjour,
J'aimerais, dans la cellule active que seul les caractères "0123456789+" soit autorisé.

Je fais ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim cp As Variant
 
 cp = InStr(dix, "0123456789+")
ou
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim cp As Variant
 
 cp = InStr(1,dix, "0123456789+")
Ou
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim cp As Variant
 
 cp = InStr(1, dix, "0123456789+",1)
Cela me retourne invariablement 0 (même si Dix est égal à un caractère de la chaine)
J'ai aussi tester avec cp en integer

Merci
FikoU