Probleme avec fonction left() en vba

Probleme avec fonction left() en vba - VB/VBA/VBS - Programmation

Marsh Posté le 07-11-2006 à 06:46:08    

Salut! :hello:  
 
J'ai un champ de type string dans une table access sur lequel j'applique une boucle if pour voir si le premier caractere est equal a la lettre "A" (que ce soit A majuscule ou minuscule a)ou a un chiffre. dans ma fonction en vba, j'ai le code suivant:
 
if left(champ1,1)= 'A' then
 
mais j'ai l'erreur suivant quand j'essaie de compiler:
[I]Compile error: expected expression.[/I]
 
J'essaie aussi de determiner si le premier caractere est un chiffre  
 
if left(champ1,1)= numerique (entre 0 et 9) then
 
quelqu'un sait c'est koi la formulation exacte en vba pour savoir si un caractere est un chiffre ou une lettre sans avoir a repeter la condition dans mon if plusieurs fois pour inclure toutes les valeurs comprises entre 0 et 9?
 
Merci d'avance

Reply

Marsh Posté le 07-11-2006 à 06:46:08   

Reply

Marsh Posté le 07-11-2006 à 07:23:18    

Bonjour,
pour la 2ème question:
 
if   IsNumeric(moncaractère) then  
 
devrait faire l'affaire
 
pour la première, remplaces 'A' par "A"
Cordialement

Reply

Marsh Posté le 07-11-2006 à 08:40:09    

Ca marche bien!
merci beaucooup seniorpapou

Reply

Marsh Posté le 08-11-2006 à 13:46:16    

salut,
 
la syntaxte c'est if left(champ1,1)= "A" then

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed