Vba recherchev : syntaxe particulière?

Résolu/Fermé
Bonjour,

quand on fait une recherchev en vba entre différents onglets d'un classeur, existe-t-il des choses particulières à écrire?

Merci par avance pour votre réponse.

12 réponses

  1. http://cjoint.com/12oc/BJvvZYyUfpI.htm

    ici un exemple qui ne fonctionne pas, alors que la même demande marche dans un seul onglet
    0
    1. Contributeur
      Bonjour,
      Elle est où ta macro ?
      A+
      0
      1. bon, alors là , j'arrive même plus quand c'est le même onglet.
        Voici le lien avec une recherchev dans un seul onglet.

        http://cjoint.com/12oc/BJwv3BZdKPi.htm
        0
        1. ... avec le bon fichier...normalement
          http://cjoint.com/12oc/BJwwdcg9UbT.htm
          0
          1. Contributeur
            Bonsoir,

            juste en regardant les cellules occupées j'ai l'impression que tu inverses ligne et colonne dans cells(ligne,colonne)

            eric
            0
            1. Contributeur
              Bonjour,
              Bonjour Eric,
              Exact pour inversion ligne et colonne.
              Et tu n'a mêmùe pas besoin de bouton pour actualiser...
              Clic droit sur le nom de l'onglet -> Visualiser le code ..
              Dans la feuille qui s'ouvre tu colle ...
              Private Sub Worksheet_Change(ByVal Target As Range)  
                  If Target.Address = "$B$8" Then  
                      Cells(8, 3).Value = Application.WorksheetFunction.VLookup(Cells(8, 2). _  
                      Value, Range(Cells(11, 5), Cells(14, 6)), 2, False)  
                  End If  
              End Sub

              Ce sera actualiser à chaque changement dans ta liste de choix.
              A+
              EDIT :
              Si les données sont sur une autre feuille Vlookup ne supporte pas les adresses composite...
              Private Sub Worksheet_Change(ByVal Target As Range)
                  If Target.Address = "$B$8" Then
                      Cells(8, 3).Value = Application.WorksheetFunction.VLookup(Cells(8, 2). _
                      Value, Sheets("Sheet2").[E11:F14], 2, False)
                  End If
              End Sub

              Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
              NOTE : Je ne répond pas aux MP pour les questions techniques.
              0
              1. Bonjour,

                j'ai constaté aussi que ce code était faux. Excusez-moi encore une fois.
                Je l'ai refait et cela fonctionnait. En revanche, je ne sais utiliser vlookup si je mettais des dates au lieu des noms et des prénoms.
                0
                1. Contributeur
                  Tu a vu mon Edit poste précédant ?
                  Les date c'est pour ta colonne recherche ?
                  Si oui, Formater en Date ou en texte ?

                  0
                  1. En fait je cherche des dates à partir d'autres dates, pour répondre à ta question.

                    Qu'est-ce qu'une adresse composite?

                    J'ai lu ton message précédent oui mais je n'ai pas testé.
                    Merci pour ton aide en tout cas
                    0
                    1. Contributeur
                      En fait je cherche des dates à partir d'autres dates, pour répondre à ta question
                      Ma question est.... Les cellules sont formattées en date ou en texte..

                      Qu'est-ce qu'une adresse composite?
                      Voire la différence entre mes deux exemples.

                      Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
                      NOTE : Je ne répond pas aux MP pour les questions techniques.
                      0