OVH Cloud OVH Cloud

Existence caractère

4 réponses
Avatar
Kyvu
Bonjour,

En VBA, dans une cha=EEne de caract=E8res, comment fait-on=20
pour contr=F4ler si elle contient bien un caract=E8re donn=E9,=20
le signe @ par exemple?

Merci pour votre aide.

@micalement.



Kyvu On Line!

4 réponses

Avatar
garnote
Bonsoir,

Essaie ceci :

Sub Cherche()
texte = " Bonsoir tout le monde @ à bientôt."
dedans = InStr(1, texte, "@")
If dedans <> 0 Then MsgBox "@ est dans le texte."
End Sub

Serge

"Kyvu" a écrit dans le message de
news: 1c4c501c45242$9a88eb00$
Bonjour,

En VBA, dans une chaîne de caractères, comment fait-on
pour contrôler si elle contient bien un caractère donné,
le signe @ par exemple?

Merci pour votre aide.

@micalement.



Kyvu On Line!
Avatar
garnote
Pas nécessaire d'écrire 1 dans InStr(1,texte, "@")
InStr(texte, "@") envoie la position de "@" dans la chaîne «texte».

Sub Cherche()
texte = " Bonsoir tout le monde @ à bientôt."
dedans = InStr(texte, "@")
If dedans <> 0 Then MsgBox "@ est dans le texte."
End Sub

Serge
Avatar
ChrisV
Bonjour Kyvu,

Ou encore...

If ActiveCell.Text Like "*@*" Then MsgBox _
"La cellule active contient le caractère ""@""."


ChrisV


"Kyvu" a écrit dans le message de
news:1c4c501c45242$9a88eb00$
Bonjour,

En VBA, dans une chaîne de caractères, comment fait-on
pour contrôler si elle contient bien un caractère donné,
le signe @ par exemple?

Merci pour votre aide.

@micalement.



Kyvu On Line!
Avatar
Kyvu