XL 2010 Recherche dans une plage

H

Hieu

XLDnaute Impliqué

• 23 Novembre 2016

• #2

Salut Ghislain,

Comme ca ?
celluletrouvee2.Offset(0, 5)

 

Vote positif 0 Vote négatif

G

GHISLAIN

XLDnaute Impliqué

• 23 Novembre 2016

• #3

Hello Hieu ,
je viens de tester ta proposition:
Sheets(ActiveSheet.Range("ab1").Value).Range(celluletrouvee2.Offset(0, 5)).Find(ActiveCell(1, -3).Value, lookat:=xlWhole)
elle me donne une erreur 1004

je continue a chercher

merci

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 23 Novembre 2016

• #4

Ahhh...
Parti trop vite ;
Tu as fait un set sur un ctrl + f
Ce que tu veux c est un offset sur la plage. tu peux faire :
Set titi = Range("d12:h12")

Et faire un offset sur ton titi
Titi.offset(0,5).

Un fichier exemple pour faire des tests ?

 

Vote positif 0 Vote négatif

G

GHISLAIN

XLDnaute Impliqué

• 23 Novembre 2016

• #5

voili voila

 

Pièces jointes

• recherche par 2.xlsm

  23.5 KB · Affichages: 43

Vote positif 0 Vote négatif

G

GHISLAIN

XLDnaute Impliqué

• 23 Novembre 2016

• #6

pour info

j'ai testé ca :
Set celluletrouvee2 = celluletrouvee.Offset(1, 5).Find(TextBox1.Value, lookat:=xlWhole)

pas d'erreur mais me trouve rien

 

Vote positif 0 Vote négatif

G

GHISLAIN

XLDnaute Impliqué

• 23 Novembre 2016

• #7

je repasse demain

merci bonne soirée

amicalement

Ghislain

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 24 Novembre 2016

• #8

Salut Ghislain,

Voici, je crois, ce que tu veux :

VB:

Set celluletrouvee2 = Sheets(ActiveSheet.Range("ab1").Value).Range("C" & ligne & ":h" & ligne).Find(TextBox1.Value, lookat:=xlWhole)

 

Vote positif 0 Vote négatif