Excel Downloads Forums - Afficher un message

26/09/2003, 11h07

par ex :

dim machaine as string

for i = 1 to len(machaine)

if mid(machaine,i,1) > Chr(47) and mid(machaine,i,1) < Chr(58) then
msgbox "chiffre détecter !!"
end if

next i

26/09/2003, 11h07	#4 (permalink)
arnaud Guest Messages: n/a	Re: extraction de mots dans une phrase par ex : dim machaine as string for i = 1 to len(machaine) if mid(machaine,i,1) > Chr(47) and mid(machaine,i,1) < Chr(58) then msgbox "chiffre détecter !!" end if next i