OVH Cloud OVH Cloud

colonne active

2 réponses
Avatar
bernard
Bonsoir =E0 tous,
je voudrai comparer, d=E8s la saisie, le contenu saisi(=20
nombre) avec celui d'une cellule situ=E9 5 lignes au dessus=20
et ce quelque soit la colonne active. une instruction du=20
genre active columm?
merci de partager vos connaissances
Bernard

2 réponses

Avatar
Hervé
Salut Bernard,
A mettre dans le module de ta feuille et à modifier pour la comparaison :

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Row >= 5 And .Value <> "" Then
'modifier ici la comparaison
If .Value = .Offset(-5, 0).Value Then
MsgBox "C'est bon, la valeur est la même !"
End If
End If
End With
End Sub

Hervé.

"bernard" a écrit dans le message news:
1dd4301c388fd$83531730$
Bonsoir à tous,
je voudrai comparer, dès la saisie, le contenu saisi(
nombre) avec celui d'une cellule situé 5 lignes au dessus
et ce quelque soit la colonne active. une instruction du
genre active columm?
merci de partager vos connaissances
Bernard
Avatar
garnote
Salut Bernard,

Une suggestion : Fais un clic droit sur ton
onglet de feuille, clique sur Visualiser le code
et colle cette macro dans la fenêtre qui va apparaître.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = Target.Offset(-5, 0) Then MsgBox "Pareil."
End Sub

Serge

"bernard" a écrit dans le message de news:
1dd4301c388fd$83531730$
Bonsoir à tous,
je voudrai comparer, dès la saisie, le contenu saisi(
nombre) avec celui d'une cellule situé 5 lignes au dessus
et ce quelque soit la colonne active. une instruction du
genre active columm?
merci de partager vos connaissances
Bernard