detecter un .

[ninou58]

Bonjour tout le monde!!

Je voudrais savoir s'il est possible de tecter un point dans un mot.
Par exemple XXXX.Y
J'aimerais faire s'il y a un point dans le mot on enlève les 2 dernières lettres.
Pour enlever les 2 dernières lettres j'ai ceci:

mavar = Mid(nom, 1, Len(nom) - 2)

Mais il faudait qu'avant de faire la suppression de ces lettres, detecter le point.

Merci d'avance

 

[imanuelga]

bonjour,
tu peux utiliser la fonction vba instr puisque tu es en vba ( avec une formule exel se serait la fonction trouve mais qui genere une erreur si ne trouve pas et il faut donc utiliser conjointement la fonction esterreur ). Mais avec vba donc pas de pblm avec instr car si ne trouve pas renvoie 0 , il faut tester :
if instr(1,nom,'.')>0 then ...etc

Salutations cordiales

 

[ninou58]

Parfait, je te remerci, ca fonctionne très bien maintenant.


Bonne journée