detecter des caracteres speciaux dans une macros XLS

Marsh Posté le 09-10-2003 à 14:08:06

Tout est dans le titr, je voudrais savoir s il est possible de detecter des caracteres ke l on trouve parfois dans des langues speciale : üÜöÖ....

c est possible ca ?

---------------
#mais-chut

Reply

Marsh Posté le 09-10-2003 à 14:08:06

Reply

Marsh Posté le 09-10-2003 à 16:38:47

Z_COOL a écrit :

Tout est dans le titr, je voudrais savoir s il est possible de detecter des caracteres ke l on trouve parfois dans des langues speciale : üÜöÖ....

c est possible ca ?

oui, c'est possible ! Suffit d'utiliser les fonctions de traitement des chaines de caractères. Tu as tous ça dans l'aide de VB. Il va falloir également que tu distingue les caratères minuscules ou majuscules. Je crois qu'il existe une fonction sous VB pour le faire, sinon une API windows me permet. Pour terminer tu as deux manières, soit tu fais une comparaison caractère par caractère ou par code ASCII.

Reply

Marsh Posté le 13-10-2003 à 14:17:29

concraitement, ca donerait koi ?

parce que l aide j y ai pas franchement acces.

---------------
#mais-chut

Reply

Marsh Posté le 13-10-2003 à 16:09:27

ouai c est cool, un bide

---------------
#mais-chut

Reply

Marsh Posté le 13-10-2003 à 17:47:09

Je te garantie rien, mais normalement ça devrait marcher :

if chr(caractere) > 127 then
msgbox("Le caractère " & caractere & " semble être étendu" )
else
msgbox("Le caractère " & caractere & " semble être simple" )
end if

En effet, la norme ASCII (127 premier caractères) ne prends que les caractères américains (donc non accentués) plus des caractères à la gomme genre toute la ponctuation, @, &, $, les oppérateur arithmétiques, etc.

Sinon, si tu ne veux que des lettres et des chiffres, alors :

if (caractere >= "a" and caractere <= "z" ) or (caractere >= "A" and caractere <= "Z" ) or (caractere >= "1" and caractere <= "9" )then
msgbox("Le caractère " & caractere & " est alphanum" )
else
msgbox("Le caractère " & caractere & " est pas alphnum" )
end if

Message édité par MagicBuzz le 13-10-2003 à 17:49:44

Reply

Marsh Posté le 14-10-2003 à 08:51:54

MagicBuzz a écrit :

Je te garantie rien, mais normalement ça devrait marcher :

if chr(caractere) > 127 then
msgbox("Le caractère " & caractere & " semble être étendu" )
else
msgbox("Le caractère " & caractere & " semble être simple" )
end if

En effet, la norme ASCII (127 premier caractères) ne prends que les caractères américains (donc non accentués) plus des caractères à la gomme genre toute la ponctuation, @, &, $, les oppérateur arithmétiques, etc.

Sinon, si tu ne veux que des lettres et des chiffres, alors :

if (caractere >= "a" and caractere <= "z" ) or (caractere >= "A" and caractere <= "Z" ) or (caractere >= "1" and caractere <= "9" )then
msgbox("Le caractère " & caractere & " est alphanum" )
else
msgbox("Le caractère " & caractere & " est pas alphnum" )
end if

Merci. en effet c etait pas complike, mais je savait pas s il existait pas deja une fonctione toute faite pour cela

---------------
#mais-chut

Reply

detecter des caracteres speciaux dans une macros XLS

Sujets relatifs:

Leave a Replay