Posez votre question Signaler

Recherche d'un caractère dans une cellule en VBA [Résolu]

Messages postés
32
Date d'inscription
mardi 27 novembre 2007
Dernière intervention
13 novembre 2017
 - - Dernière réponse : mortalino
Messages postés
6812
Date d'inscription
vendredi 16 décembre 2005
Dernière intervention
21 décembre 2011
 - 16 mai 2008 à 14:23
Visual Basic 6 Posez votre question Signaler
Bonjour
je souhaiterai créer une macro VBA qui me permettrait de savoir si il y a une point dans une cellule où non
(par exemple: 884.59->ok et 88 476->non)
je souhaite créer une condition: si la cellule contient le caractère "." alors ....

merci d'avance pour votre aide
Afficher la suite 

Votre réponse

Répondre au sujet

8 réponses

Meilleure réponse
Signaler Commenter la réponse de Renfield
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
3
Merci
N2 c'est quoi, la cellule N2 ?

faut faire ce genre de choses :

Range("N2")

pour manipuler la cellule N2....

tu ne peux pas te contenter de mettre ses coordonnées

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 95 internautes nous ont dit merci ce mois-ci

Commenter la réponse de Renfield
Signaler Commenter la réponse de Renfield
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
0
Merci
regarde l'instruction InStr

après, voir quel point te bloque dans la realisation de cette macro.
Commenter la réponse de Renfield
Signaler Commenter la réponse de podzob56
Messages postés
32
Date d'inscription
mardi 27 novembre 2007
Dernière intervention
13 novembre 2017
0
Merci
il faudrait donc un truc du style:
if instr("cellule",".", ??????) then ?
quelqu'un peut m'en dire plus?
Commenter la réponse de podzob56
Signaler Commenter la réponse de Renfield
Messages postés
17308
Date d'inscription
mercredi 2 janvier 2002
Dernière intervention
22 août 2018
0
Merci
if instr(TaCelule.Text, ".") Then
'# y'a un pint dans le contenu de ta cellule
End If
Commenter la réponse de Renfield
Signaler Commenter la réponse de podzob56
Messages postés
32
Date d'inscription
mardi 27 novembre 2007
Dernière intervention
13 novembre 2017
0
Merci
ça ne fonctionne pas ...
Commenter la réponse de podzob56
Signaler Commenter la réponse de podzob56
Messages postés
32
Date d'inscription
mardi 27 novembre 2007
Dernière intervention
13 novembre 2017
0
Merci
voila ce que j'ai mis:
If  InStr(N2.Text, ".") Then ....
Commenter la réponse de podzob56
Signaler Commenter la réponse de podzob56
Messages postés
32
Date d'inscription
mardi 27 novembre 2007
Dernière intervention
13 novembre 2017
0
Merci
tout fonctionne merci beaucoup!
Commenter la réponse de podzob56
Signaler Commenter la réponse de mortalino
Messages postés
6812
Date d'inscription
vendredi 16 décembre 2005
Dernière intervention
21 décembre 2011
0
Merci
attention aux paramètres régionaux, d'une machine à l'autre, ça peut être une virgule

@++

le mystérieux chevalier,"Provençal, le gaulois"
Commenter la réponse de mortalino

Votre réponse

Répondre au sujet
Posez votre question
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.