Access VBA, test de caractère

Question

Bonjour a tous,

Je suis un newbie en programmation vba et j'ai un p'tit prob de newbie. Voici un p'tit bout de mon prog ...

Z=Natel.doc ( Par exemple)
Zar = "*""atel""*"
If X = Zar Then
MsgBox "" & X
End If

Le but étant que si la variable Z contient *atel* il s'affiche un msg avec le nom du fichier !!!!!!!!
Est ce k'il faut que j'utilise une commande particuliuère pour comparer deux chaines de caractères ? 
Merci d'avance

freeman

Shivan0910 · Answer

utilise InStr pour comparer
precisions: - Zar "*""atel""*"> Zar a pour valeur *"atel"*
- tu testes X=Zar alors que tu affectes NAtel.doc a Z (et tu oublies les guillemets a "natel.doc"
- dans ton MsgBox ' "" & ' est inutile

je pense que c'est juste parce que tu a recopier vite fait ton code mais au cas ou je prefere te le dire...

"la vitesse de la lumière est supérieure à celle du son, c'est pourquoi un imbécile parait intelligent jusqu'a ce qu'il parle !!"

cs_Jack · Answer

Salut HOFMIC 
Pour comparer des chaines :
If Texte Like "*atel*" Then ...

Pour faire même test sans tenir compte de la case :
If UCase(Texte) Like UCase("*atel*") Then ...

Vala
Jack

Access VBA, test de caractère

2 réponses

Discussions similaires