cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 23 déc. 2006 à 15:41
Merci Yan pour cette amélioration.
Je mettrais à jou après les fêtes.
yan35
Messages postés185Date d'inscriptiondimanche 29 juin 2003StatutMembreDernière intervention20 juin 2013 23 déc. 2006 à 15:27
Je viens de servir de ta fonction et je la complète avec des caractères autorisés complémentaires, comme suit :
>> sRemplaceCaractèrePar Like "[ '!#$%&()+,;=@{}~`.°]" Or _ ' ajout du °
>> sRemplaceCaractèrePar Like "[àéèêïîôùû]" Or _
sRemplaceCaractèrePar Like UCase("[àéèêïîôùû]")) Then _ ' ajout de ces caractères en majuscules
>> Car Like "[ '!#$%&()+,;=@{}~`.°]" Or _
>> Car Like "[àéèêïîôùû]" Or _
Car Like UCase("[àéèêïîôùû]")) Then _
Cordialement.
yan35
Messages postés185Date d'inscriptiondimanche 29 juin 2003StatutMembreDernière intervention20 juin 2013 23 déc. 2006 à 12:45
Eh Oui, pratique !
Merci de l'avoir écrite cette fonction.
10/10
13 déc. 2008 à 11:24
\ / : * ? " < > |
d'autant que (même si avant dotNet, VB ne les gérait pas) Windows autorise aussi les caractères unicode (japonais et autres...)
21 juil. 2007 à 18:54
23 déc. 2006 à 15:41
Je mettrais à jou après les fêtes.
23 déc. 2006 à 15:27
>> sRemplaceCaractèrePar Like "[ '!#$%&()+,;=@{}~`.°]" Or _ ' ajout du °
>> sRemplaceCaractèrePar Like "[àéèêïîôùû]" Or _
sRemplaceCaractèrePar Like UCase("[àéèêïîôùû]")) Then _ ' ajout de ces caractères en majuscules
>> Car Like "[ '!#$%&()+,;=@{}~`.°]" Or _
>> Car Like "[àéèêïîôùû]" Or _
Car Like UCase("[àéèêïîôùû]")) Then _
Cordialement.
23 déc. 2006 à 12:45
Merci de l'avoir écrite cette fonction.
10/10