Help

davouille · 11 Mars 2009

voici mon problème je voudrai sélectionner la cellule de droite dans la ma recherche sur un plage ! Comment faire selon ma recherche ! ?😱

Voici ma macro !
Cells.Find(What:="Propriétés système:", After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False).Activate
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Find(What:="Produit", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Activate.Offset(0, 1).Select

James007 · 11 Mars 2009

Re : Help

Bonjour,
Si j'ai bien compris ta demande ...
La solution la plus simple est de déclarer ta cellule recherchée, par exemple:

Code:

Dim Rng As Range

de la définir comme ta cellule recherchée:

Code:

Set Rng = Cells.Find.Find(What:="Produit", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)

... et ensuite de remplacer ta dernière ligne par ton offset

Code:

Rng.Offset(0, 1).Select

A+

pascal21 · 11 Mars 2009

Re : Help

bonjour davouille, jammes 007
davouille, il va falloir repasser par la case "charte du forum" avant de continuer à poster ici
1er message et 3 erreurs
le titre déjà ,pas explicite
bonjour, ça ne prend que quelques secondes à écrire et ça fait plaisir à celui qui lit
et enfin, merci : pareil, ça ne prend que quelques secondes à écrire et surtout ça donne envie à ceux qui ont la solution, de répondre

Help

davouille

Guest

James007

XLDnaute Barbatruc

pascal21

XLDnaute Barbatruc

Discussions similaires

Help

davouille

Guest

James007

XLDnaute Barbatruc

pascal21

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency