Recherche et selection (Macro VBA Excel)Résolu

Question

Bonjour,

Je cherche à faire une macro dans Excel, qui, 
-cherche une valeur (le mot "conto")
-Selectionne la ligne de cette valeur jusqu à la dernière ligne du fichier
-Supprime ces lignes selectionnées.

Voici le code créé :

Columns("B:B").Select
   Selection.Find(What:="conto", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    Rows("2726:2726").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Delete Shift:=xlUp

...sauf que voila, la valeur "conto" n est pas toujours en ligne 2726!!!
Il faudrait qu ici ca soit une variable et non une constante.

Je ne pense pas que ca soit difficile mais moi je suis trop débutante pour y arriver .

Par ailleurs, pouvez vous me dire ce que je devrais mettre si au lieu de selectionner la ligne qui contient "conto" je voulais selectionner la ligne du dessous.

D avance un grand merci,

xlcombat · Accepted Answer

ok c est bon j ai trouvé,
Il suffit de remplacer la ligne

Rows("2726:2726").Select 

 par la ligne

Range(Trim(Str(ActiveCell.Row)) & ":" & Trim(Str(ActiveCell.Row))).Select

Recherche et selection (Macro VBA Excel)

1 réponse

Votre réponse

Discussions similaires