pb Qualificateur ?

I

ivi

Guest
Bonjour à tous !

j'ai rédigé un programme qui test la saisie de l'utilisateur mais g un pb de qualificateur ... Que veut-il dire par là ? parce que moi, je ne comprend pas le sens du problème ...

Je vous donne la synthaxe :

dim value1 as string

sub mess()

value1= inputbox ("saisissez le numero de fiche :", "boite de dialogue")
application.scrennupdating=true

select case value1
case len(value1) = 9 : FFT_Fiche 'lance le prog FFT
case len(value1) = 6 : FRE_Fiche 'lance le prog FRE
case len(value1) = 3 : FE_Fiche 'lance le prog FE

'''' case value1.lentgh = 9 : FFT_Fiche 'lance le prog FFT
'''' case value1.lentgh = 6 : FRE_Fiche 'lance le prog FRE
'''' case value1.lentgh = 3 : FE_Fiche 'lance le prog FE
end select

cells (2,5) = value1 'la cellule L2:C5 prend la valeur value1
active.name = value1 'la feuille active prend la valeur value1


Ou sinon, j'ai rediger un autre prog avec la boucle If

if value1.lentgh > 9 then
Msgbox "pas plus de 9 caractères"
elseif value1.lentgh = 9 then
fiche_FFT
elseif value1.lentgh = 6 then
fiche_FRE
elseif value1.lentgh = 6 then
fiche_FRE
elseif value1.lentgh = 3 then
fiche_FE
end if

mais j'ai toujours la meme erreur ...

je pense que je donne mal utilisé la synthaxe ... mais je ne sais plus que faire ...

J'utilise Excel97 du pack Office
et Windows2000 Pro

Merci de venir à mon aide