Excel VBA 2016 VLookup

Anonyme
2017-09-25T17:59:41+00:00

Bonjour,

J'ai aucun problème à utiliser Recherche V dans Excel. Mais quand j'écrit un code avec VLookup il ne se passe rien. C'est-à-dire le formulaire apparaît mais aucun résultat ne s'affiche quand je sélectionne un nom d'employé dans la liste déroulante.

Voici ce que je désir faire

Obtenir le nombre d'année d'ancienneté de l'employé (À partir du nom de l'employé dans le cboNomEmployé, Rechercher cxe nom dans la feuille Comparatio et me donner le nombre d'années d'ancienneté à la 17e colonne du TablaeuComparatio)

Voici mon code

Private Sub cboAnciennetéReconnue_Change()

       txtAnciennetéReconnue.Text = Application.WorksheetFunction.VLookup(cboNomEmployé.Text, Sheets("Comparatio").Range("TableauComparatio"), 17, faux)

End Sub

Deuxièmement

Dans mon formulaire j'aimerais que la fonction vLookup tienne compte du nom et prénom (deux listes déroulante) afin de me donner la valeur recherchée.

Merci

Denis

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire

28 réponses

  1. Anonyme
    2017-09-29T14:44:17+00:00

    OK c'est gentil.

    Une fois que je dépose sur One drive. Je fait quoi?

    J'ai pas l'habitude.

    Merci

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  2. DanielCo 107.1K Points de réputation
    2017-09-29T14:18:31+00:00

    Je ne suis pas sûr de comprendre et pas sûr non plus de me faire comprendre. Est-ce que tu peux mettre ton classeur, sans données confidentielles, sur OneDrive ou sur un autre site de partage et poster le lien correspondant ?

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  3. Anonyme
    2017-09-29T13:57:24+00:00

    Bonjour,

    Pas exactement. Après avoir entré la formule Excel, je me sers de cette macro :

    Sub Formule()

        Set x = ActiveCell

        Set C = Application.InputBox("cellule desti", Type:=8)

        C.Value = "'" & x.Formula

    End Sub

    Qui écrit la formule en anglais.

    De manière générale, les formules VBA sont les mêmes que les formules Excel anglaises. Il suffit d'ajouter "Application" devant.

    Daniel

    Bonjour Daniel,

    Je ne suis pas certain d'avoir compris

    Tu l'écris comme une formule Excel avec les valeurs de la formule VBA :

    Si cboNomEmployé.Text est égal à toto :

    =RECHERCHEV("toto";Comparatio!TableauComparatio;17;FAUX

    'Sub Formule()

    '    Set x = ActiveCell

    '    Set C = Application.InputBox("cellule desti", Type:=8)

    '    C.Value = "'" & x.Formula

    'End Sub

    À savoir comment voir un code de formules que J'ai écrit dans plusieurs cellules.

    Dois-je écrire ces codes dans une cellule?

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  4. DanielCo 107.1K Points de réputation
    2017-09-28T14:30:12+00:00

    Tu l'écris comme une formule Excel avec les valeurs de la formule VBA :

    Si cboNomEmployé.Text est égal à toto :

    =RECHERCHEV("toto";Comparatio!TableauComparatio;17;FAUX)

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  5. Anonyme
    2017-09-28T13:21:23+00:00

    Merci Daniel

    Dois-je écrire ce code dans l'application VBA dans la feuille où sont inscrits les formules?

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire