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 :

Lire les 3 premières lettres d'une cellule [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Inscrit en
    Décembre 2012
    Messages
    28
    Détails du profil
    Informations forums :
    Inscription : Décembre 2012
    Messages : 28
    Points : 21
    Points
    21
    Par défaut Lire les 3 premières lettres d'une cellule
    Bonjour , avec ce code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub test()
        Dim C As Range
        With Sheets("Traitement")
            For Each C In .Range(.[B2], .Cells(.Rows.Count, 2).End(xlUp))
                C.Offset(, 1) = Application.VLookup(C, [Ressource!A:B], 2, 0)
            Next C
        End With
    End Sub
    Comment pourrais-je lire les 3 première lettres des cellules de la colonne "B" dans la feuille "Traitements" ?

    "Merci"

  2. #2
    Expert éminent Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 754
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 754
    Points : 9 396
    Points
    9 396
    Par défaut
    Bonjour,

    Si utilisé dans la boucle
    Jérôme

  3. #3
    Membre à l'essai
    Inscrit en
    Décembre 2012
    Messages
    28
    Détails du profil
    Informations forums :
    Inscription : Décembre 2012
    Messages : 28
    Points : 21
    Points
    21
    Par défaut
    Je ne sais pas ou le mettre dans le code ... :'(

  4. #4
    Expert éminent Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 754
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 754
    Points : 9 396
    Points
    9 396
    Par défaut
    a essayer (si la colonne A de ressource contient les 3 premières lettres de la colonne B de l'onglet Traitement)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    C.Offset(, 1) = Application.VLookup(Left(C.Value,3), [Ressource!A:B], 2, 0)
    Jérôme

  5. #5
    Membre à l'essai
    Inscrit en
    Décembre 2012
    Messages
    28
    Détails du profil
    Informations forums :
    Inscription : Décembre 2012
    Messages : 28
    Points : 21
    Points
    21
    Par défaut
    Il me dise que l'indice n'appartient pas a la selection

  6. #6
    Expert éminent Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 754
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 754
    Points : 9 396
    Points
    9 396
    Par défaut
    quelle ligne se met en erreur ?
    Jérôme

  7. #7
    Membre à l'essai
    Inscrit en
    Décembre 2012
    Messages
    28
    Détails du profil
    Informations forums :
    Inscription : Décembre 2012
    Messages : 28
    Points : 21
    Points
    21
    Par défaut
    C'est bon j'ai trouvé probleme de nommage de feuille !

    Merci beaucoouuup !!!!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Lazarus] Première lettre d'une cellule d'un StringGrid en majuscule
    Par winow dans le forum Lazarus
    Réponses: 42
    Dernier message: 26/02/2015, 11h56
  2. [XL-2007] Sélectionner les 3 premières lettre d'une chaine de caractères
    Par souad12 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 06/11/2012, 10h10
  3. [XL-2007] Comment vérifier la première lettre d'une cellule?
    Par mentat dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 31/01/2010, 21h28
  4. Extraire les deux dernieres lettres d'une cellule
    Par SybVicious dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 03/09/2006, 11h54
  5. Récupérer les deux premières lettres d'une chaine
    Par moscovisci dans le forum ASP
    Réponses: 3
    Dernier message: 10/01/2006, 14h53

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