Recherche et selection (Macro VBA Excel) [Résolu]

Messages postés
4
Date d'inscription
mardi 28 juillet 2009
Statut
Membre
Dernière intervention
30 juillet 2009
- - Dernière réponse : xlcombat
Messages postés
4
Date d'inscription
mardi 28 juillet 2009
Statut
Membre
Dernière intervention
30 juillet 2009
- 29 juil. 2009 à 16:16
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,
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
4
Date d'inscription
mardi 28 juillet 2009
Statut
Membre
Dernière intervention
30 juillet 2009
3
Merci
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

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 203 internautes nous ont dit merci ce mois-ci

Commenter la réponse de xlcombat