OVH Cloud OVH Cloud

valeur précédente

2 réponses
Avatar
philip
Bonjour,
j'ai un soucis. Lorsqu'une valeur dans un tableau est changée, je voudrais
récupérer le contenu de la cellule précédente, avant d'avoir tapé sur Entrée,
Tab ou flèche directionnelle. La procédure Worksheet_Change se déclenche, non
pas lorsque l'on change la valeur, mais lorsque la valeur est déjà changée et
que la cellule active est celle qui le devient après avoir tapé sur Entrée ou
Tab, donc trop tard. J'ai essayé la propriété Precedents dans
Range(ActiveCell.address).Precedents.Value; ça ne marche pas.
Y a-t-il une solution ?
Merci

2 réponses

Avatar
JB
Bonjour,

Dim valPrécédente
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
MsgBox valPrécédente
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
valPrécédente = Target.Value
End Sub

JB


Bonjour,
j'ai un soucis. Lorsqu'une valeur dans un tableau est changée, je voudr ais
récupérer le contenu de la cellule précédente, avant d'avoir tap é sur Entrée,
Tab ou flèche directionnelle. La procédure Worksheet_Change se décl enche, non
pas lorsque l'on change la valeur, mais lorsque la valeur est déjà ch angée et
que la cellule active est celle qui le devient après avoir tapé sur E ntrée ou
Tab, donc trop tard. J'ai essayé la propriété Precedents dans
Range(ActiveCell.address).Precedents.Value; ça ne marche pas.
Y a-t-il une solution ?
Merci


Avatar
philip
C'est magique ! Je peux maintenant faire un contrôle sur le type de valeur
précédente et programmer les actions en conséquence.
Merci beaucoup JB


Bonjour,

Dim valPrécédente
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
MsgBox valPrécédente
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
valPrécédente = Target.Value
End Sub

JB


Bonjour,
j'ai un soucis. Lorsqu'une valeur dans un tableau est changée, je voudrais
récupérer le contenu de la cellule précédente, avant d'avoir tapé sur Entrée,
Tab ou flèche directionnelle. La procédure Worksheet_Change se déclenche, non
pas lorsque l'on change la valeur, mais lorsque la valeur est déjà changée et
que la cellule active est celle qui le devient après avoir tapé sur Entrée ou
Tab, donc trop tard. J'ai essayé la propriété Precedents dans
Range(ActiveCell.address).Precedents.Value; ça ne marche pas.
Y a-t-il une solution ?
Merci