Bonjour,

Je n'arrive à convertir et/ou récupérer l'adresse d'un target dans une variable pour pouvoir l'utiliser ensuite dans une formul de calcul.

Voici un code très simple que j'ai voulu effectué

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Worksheet_Change(ByVal Target As Range)
 
 
   Dim TxE As Range, Intersection As Range, o As Variant, p As Variant 'j'ai essayé aussi Range mais type non conforme
 
   Set TxE = Range("AD118:AY118")
   p = Target.Address(RowAbsolute:=False, ColumnAbsolute:=False)
 
     Target.Offset(-1, 0).Formula = "=" & p &"""
 
'ci dessous ce que j'ai essayé
'*   Target.Offset(-1, 0).Formula = "=" & p &"'"
End sub
Merci de votre aide