récupérer sélection précédente

[totoland]

Bonjour,

Je souhaiterais récupérer la cellule (ou la plage) qui était sélectionnée avant que la sélection ne change. A chaque changement de cellule.

Par exemple, j'étais en "A1", je pars en "Z33". Comment je peux récupérer "A1" ?

 

[Hervé]

Bonjour

Un début de commencement d'embryon de proposition :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveWorkbook.Names.Add Name:="vev", RefersToR1C1:=ActiveCell
Application.Goto Reference:="vev"
MsgBox Application.PreviousSelections(2).Address
'ActiveCell.Value = Range(Application.PreviousSelections(2).Address).Value + 1

End Sub

cette macro renvoi l'adresse de l'avant derniere cellule selectionner.

cette macro bug la premiere fois de l'utilisation car le previousselections(2) n'est pas encore alimenté. au 2ème lancement toutrentre dans l'ordre.

En espérant que ceci te donnera un début de commencement d'embryon de réponse.

Salut
Hervé