IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Texte cellule Excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre du Club
    Inscrit en
    Mars 2004
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Mars 2004
    Messages : 7
    Par défaut Texte cellule Excel
    Bonjour,
    Comment est-ce que je pourrai dire en VB: Si le texte de la cellule contient le mot "Robinet", alors... ?

    Merci d'avance

  2. #2
    Expert confirmé Avatar de illight
    Homme Profil pro
    Analyste décisionnel
    Inscrit en
    Septembre 2005
    Messages
    2 344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste décisionnel
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2005
    Messages : 2 344
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if instr(1,cells(1,1).value,"Robinet",vbTextCompare) <> 0 then
    Un exemple parmi tant d'autres
    1. Avant de poster, et http://www.developpez.com/sources/
    2. Lors du post, n'oubliez pas, si besoin les balises CODE => voir ici pour l'utilisation
    3. N'oubliez pas le
    4. N'oubliez pas le si la réponse vous a été utile !

  3. #3
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Citation Envoyé par illight
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if instr(1,cells(1,1).value,"Robinet",vbTextCompare) <> 0 then
    Un exemple parmi tant d'autres
    Non, je ne trouve pas, c'est bien, Instr ! quoique... je mettrais :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if instr(cells(1,1).value,"Robinet", vbTextCompare) <> 0 then
    Si tu mets Instr(1,....) faudra que le texte de la cellule commence par le mot cherché. lovevale dit "Contient" et non "Commence par"

  4. #4
    Expert confirmé Avatar de illight
    Homme Profil pro
    Analyste décisionnel
    Inscrit en
    Septembre 2005
    Messages
    2 344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste décisionnel
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2005
    Messages : 2 344
    Par défaut
    Citation Envoyé par ouskel'n'or
    Non, je ne trouve pas, c'est bien, Instr ! quoique... je mettrais :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if instr(cells(1,1).value,"Robinet", vbTextCompare) <> 0 then
    Si tu mets Instr(1,....) faudra que le texte de la cellule commence par le mot cherché. lovevale dit "Contient" et non "Commence par"

    Si tu veux chipoter dans l'aide :

    Si cet argument est omis, la recherche commence au premier caractère.
    Donc que tu mette 1 ou pas ça revient au meme De plus :

    L'argument start est obligatoire si l'argument compare est indiqué
    Donc t'es obligé de mettre 1 t'as testé au moins ce que t'as écrit petit mouton ?
    1. Avant de poster, et http://www.developpez.com/sources/
    2. Lors du post, n'oubliez pas, si besoin les balises CODE => voir ici pour l'utilisation
    3. N'oubliez pas le
    4. N'oubliez pas le si la réponse vous a été utile !

  5. #5
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Oui, j'ai testé mais j'avais utilisé ce que j'utilise toujours (vieille habitude), lcase pour les deux éléments. Pas besoin de Compare, pas besoin de Instr(1,...)
    Ainsi, si l'option Compare binary a été déclarée dans le module -> jamais d'accident

    Bon, ça va, t'as raison !

  6. #6
    Membre du Club
    Inscrit en
    Mars 2004
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Mars 2004
    Messages : 7
    Par défaut
    Merci beaucoup

  7. #7
    Membre éprouvé
    Inscrit en
    Juillet 2005
    Messages
    141
    Détails du profil
    Informations forums :
    Inscription : Juillet 2005
    Messages : 141
    Par défaut
    Bonjour,
    bienvenue sur le forum
    je pense que tu devrais lire les règles du forum qui te suggère avant de poster de lire:
    les tutoriels
    les FAQS
    et tutti quanti

    rémi

Discussions similaires

  1. faire liaison Zone texte en VB6 avec cellule Excel
    Par brahime dans le forum VB 6 et antérieur
    Réponses: 4
    Dernier message: 21/05/2006, 21h25
  2. Remplacer un texte dans une cellule Excel à partir d'un point donné
    Par tonyC dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 28/04/2006, 19h05
  3. Changement couleur cellule EXCEL en fonction du texte
    Par kikaillo dans le forum Macros et VBA Excel
    Réponses: 17
    Dernier message: 14/04/2006, 14h22
  4. Réponses: 4
    Dernier message: 15/04/2005, 15h25
  5. [VBA-E] recuperer le texte d un commentaire de cellule excel
    Par Verbal-Quint dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 15/07/2004, 10h27

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo