Vba - récupérer valeur cellule d'une ligne sélectionnée

Re : Vba - récupérer valeur cellule d'une ligne sélectionnée

Bonsoir,
Tout dépend de la procédure et son application
Ici, teste la colonne C en fonction de la ligne de la cellule active
A+
kjin

Re : Vba - récupérer valeur cellule d'une ligne sélectionnée

Bonsoir, merci pour ta réponse, j’ai réussi à effectuer une partie de ce que je voulais en bidouillant un peu (voir bouton dans le fichier joint) :

Sub Selection_Rang_2_rang_3()

Set s = Selection
Set c = Cells(ActiveCell.Row, 4)
Set rng = Range("d1:d" & Range("d65536").End(xlUp).Row)

s.Resize(Application.CountIf(rng, c)).Select

End Sub

Bon, ce n’est pas formidable mais grâce au code ci-dessus, si je sélectionne une ligne de rang 2 (valeur colonne B), toutes les lignes de N° de zone (colonne D) identiques sont sélectionnées. Dans le cadre d’un profil d’affichage particulier, où seules les lignes de rang 1 et 2 sont affichées, cela me permet de copier-coller ou couper-coller en sélectionnant aussi les lignes de rang 3 associées…

Maintenant, j’ai plusieurs problèmes pour arriver à ce que je souhaite :
1 – il faudrait que cette macro se lance en même temps que le profil d’affichage « rang 1 + rang 2 » dans mon fichier exemple 2
2 – cette macro doit être active à chaque fois que j’effectue la sélection d’une ligne de rang 2, et ce, tant que je suis sur ce profil d’affichage
3 – si je change de profil d’affichage (« afficher tout » par exemple), alors cette macro doit s’arrêter…

Si quelqu’un peut m’aider un peu…

Merci d’avance