Problème de contrôle de saisies qui ne fonctionne que pour les saisies numériques

[Magic_Doctor]

Bonjour,

Depuis un moment, avec l'aide incontournable du forum, j'essaie de mettre au point un contrôle de saisies pour une feuille. Il est un peu complexe car il fait beaucoup de choses. Il marche, ma foi, très bien, sauf quand il s'agit se saisies erronées non numériques.
J'ai réalisé un résumé le plus clair possible de cette feuille où tout y est expliqué en détail.

Un grand merci à qui me tirera d'affaire !

 

[pierrejean]

Re : Problème de contrôle de saisies qui ne fonctionne que pour les saisies numérique

Re

Explication de

[COLOR=red]x =[/COLOR] [COLOR=blue]Range(Names(i).Name).Value = "? ? ?"[/COLOR]

Examine la partie en bleu
Il s'agit d'une egalité qui peut etre vraie ou fausse
et le resultat (donc x ) est bien soit True soit False
Ce qui permet ensuite

 If Left(Names(i).Name, Len(prefixe)) = prefixe [COLOR=blue]And x[/COLOR] Then

C'est d'ailleurs ici que j'ignorais comment utiliser l'information

Quand au on error resume next

pour ma part je m'impose de:
Ne l'utiliser que conjointement avec On error Goto 0
N'encadrer que 2 ou 3 lignes maximum en sachant quelle(s) erreur(s) j'accepte
Mais bien sur chacun voit midi a sa porte