XL 2016 Associer une cellule active à un range variable

[Xavier59]

Bonjour

J'ai un petit problème, j'aimerais remplacer le RANGE("C12") par le range correspondant à ma une cellule que je selectionne.

Le but étant que lorsque je selectionne la cellule et que je lance la macro ma RechercheFind vienne chercher le Range que j'ai selectipnné.

Dim a As Range

a = ActiveCell.Select

Sheets("PILOTAGE").Range("N12:U12").ClearContents
R = RechFind(Sheets("PILOTAGE").Range("C12").Value, ThisWorkbook.Name, Sheets("BASE2").Name, Range("D2😀20000").Address, TB())


Merci beaucoup

 

[sylvanu]

Bonsoir Xavier,
Vous n'étiez pas loin.
Remplacez a = ActiveCell.Select par a = ActiveCell.Value
et Range("C12").Value par a.