Bonjour,

Je cherche à empêcher l'evénement sélection change sur une référence on va dire circulaire.

Voilà j'ai un code qui effectue une multiplication sur le target.offset (-2,0)

Sauf que ce code s'applique aussi sur le Range de cet offset (-2,0)

Donc forcément, je ne sais quel terme on emploie pour VBA, mais ceci correspon à une référence circulaire

Voici le code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Worksheet_Change(ByVal Target As Range)
 
 
   Dim TxE As Range, Intersection As Range, o As Range, p As Variant
 
   Set TxE = Range("AD338:AY338")
   Set HP = Range("AD336:AY336")
 
  p = Target.Offset(-1, 0).Value
 
    If Not Intersect(TxE, Target) Is Nothing And Target.Count = 1 Then
    Target.Offset(-2, 0).Value = p * Target.Value
    End If
    If Not Intersect(HP, Target) Is Nothing And Target.Count = 1 Then
    Target.Offset(2, 0).Value = p / Target.Value
    End If
 
 
 
End Sub
J'aurais besoin soit de dire à Vba de ne ne pas intervenir ou de trouver une autre solution que je n'ai pas à brule pour point

Merci de votre aide