Discussion :

[Guib83]

Bonjour à tous,

Je souhaiterai réaliser une macro qui me permette d'éffectuer une recherche V sous Excel 2010.

J'ai commencé à programmer quelque chose mais je ne suis pas au top...

J'ai 2 feuilles Excel, une "Datasource" et une "Research". Je veux que la recherche me retrouve les informations des colonnes B à D de la feuille "Datasource" et me les retranscrive dans la feuille "Research" à partir du moment ou je rentre une référence matériel dans la colonne A.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub Recherchev()
'
' Recherchev Macro
'
    Dim FeSource As Worksheet
    Dim FeDest As Worksheet
    Dim PlgSource As Range
    Dim PlgDest As Range
    Dim Cel As Range
    Dim Ligne As Long
 
 
    Set FeSource = Worksheets("Datasource")
    Set FeDest = Worksheets("Research")
 
 
    With FeSource
 
        Set PlgSource = .Range(.Cells(2, 1), .Cells(.Rows.Count, 1).End(xlUp))
 
    End With
 
    With FeDest
 
        Set PlgDest = .Range(.Cells(2, 1), .Cells(.Rows.Count, 1).End(xlUp))
 
    End With

Je ne sais pas comment finir le code ... Pourriez-vous m'aider?

D'avance merci

[Gado2600]

Bonjour,

Ton explication n'est pas assez détaillée à mon goût mais je pense que ce que tu cherches à faire, c'est une formule de rechercheV mais qu'il te manque la partie "auto-plage", non ?
Dans ce cas-là, pas forcément besoin de macro mais de combiner un rechercheV avec un Indirect.

Sinon, si tu sais faire ton rechercheV en formule et que tu souhaites le retranscrire en VBA, tu as l'enregistreur de macro qu existe et qui te ressortir une fonction de type formulaR1C1.

Cordialement,

[Guib83]

En détail :

Un seul classeur avec deux feuilles: "Datasource" et "Research". Si, dans la colonne A (de A2 à A8665) de ma feuille "Datasource", je trouve la valeur de la colonne A (de A2 à A8665) de ma feuille "Research", alors je dois copier la valeur des colonnes qui vont de B à D (de la ligne 2 à la ligne 8665) de ma feuille "Datasource" dans les colonnes B à D (de la ligne 2 à la ligne 8665) de ma feuille "Research".
Toutes les cellules de la plage B2 : D8665 (Datasource) ne contiennent pas de valeurs. Aussi, quand il n'y a aucune valeur, je souhaite éviter les valeurs N/A et autres.

[Philippe Tulliez]

Bonjour,

Aussi, quand il n'y a aucune valeur, je souhaite éviter les valeurs N/A et autres.

Si tu as une version d'excel au delà de la version 2007, il suffit de faire précéder la formule RECHERCHEV par SIERREUR. Dans le cas contraire utiliser ESTNA et SI

[EDIT]
Est-ce que la procédure proposée dans cette contribution LookupLabelRange - Ajouter une colonne à une liste de données ne pourrait pas convenir ?