vlookup et noms de colonnes

[help]

Salut à tous,

Je découvre VB depuis pas longtemps et je progresse tous les jours en suivant les différents fils.
Pour ma part, j'aurais besoin de conseils pour améliorer ma macro sur 2 points :

Voici ma formule

ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-2]:R[1000]C[-2],_
[chaispas.xls]Client!R2C1:R1000C60,_
9,_
0)"


1/ est-il possible de rechercher sur toute la feuille "Client" sans préciser les colonnes ? j'ai pas réussi ...
2/ actuellement je récupère la colonne 9 mais je ne suis pas certain que les colonnes ne bougeront pas comment faire un vlookup en récupérant la colonne "prix" qui est ma colonne 9 ?


Merci d'avance à tous.

 

[Celeda]

Bonjour,

Je ne sais pas si cela va t'aider mais voici une function que j'utilise à l'occasion :

Function ChercheData(Eqt As Variant, Tablo As Range, Column As Integer)
ChercheData = Application.WorksheetFunction.Application.VLookup(Eqt, Tablo, Column, False)
End Function

à placer dans un module et à adapter selon tes besoins,


et je ne sais plus qui il faut remercier mais le coeur y est.

Celeda

 

[Myta]

Salut help, Celeda

Si ta colonne porte une cellule de titre ("Prix")

Sub No_Colonne()
'Récuperer numéro de colonne
Dim Colonne As Byte
Colonne = Worksheets("Client").Cells.Find(What:="Prix", MatchCase:=False).Column
End Sub

Te donneras le numéro de la colonne

Mytå

 

[help]

Salut le forum,

je me suis pas levé tôt ce matin, ...
mais je vous remercie pour vos coups de main !!

Merci Myta : c'est exactement ce qu'il me faut
Merci celeda : je vais tester ta fonction.

@+