OVH Cloud OVH Cloud

Réference circulaire suite

1 réponse
Avatar
JPB
Bonjour,

Je reviens sur un "problème" pas entièrement résolu.
Je désire faire la fonction suivante
J'ai 2 colonnes A et F et j'aimerais mettre la fonction suivante en F: "
SI ( A<F ; A ;F)"
Je veux que les cellules en F suivent la diminution des valeurs en A mais
pas leur augmentation.
Évidemment il y a référence circulaire.
Serge m'a proposé la solution suivante qui marche mais n'est pas adaptée à
mon cas parce que mes cellules en A viennent d'un autre classeur et rien ne
se met à jour..

> macro devrait convenir pour toutes les lignes des colonnes AC et AJ :
> Private Sub Worksheet_Change(ByVal Target As Range)
> If Target.Column = 29 Or Target.Column = 36 Then
> L = Target.Row
> Cells(L, 36) = WorksheetFunction.Min(Cells(L, 29), Cells(L, 36))
> End If
> End Sub

Comment faire pour que cette fonction se lance correctement.
Merci pour votre aide

Jean-Pierre

1 réponse

Avatar
Jacky
Bonjour,
As-tu testé un truc du genre

=SI([Classeur2]Feuil1!$A$1<F1;[Classeur2]Feuil1!$A$1;F1)

--
Salutations
JJ



"JPB" a écrit dans le message de news:

Bonjour,

Je reviens sur un "problème" pas entièrement résolu.
Je désire faire la fonction suivante
J'ai 2 colonnes A et F et j'aimerais mettre la fonction suivante en F:
"
SI ( A<F ; A ;F)"
Je veux que les cellules en F suivent la diminution des valeurs en A mais
pas leur augmentation.
Évidemment il y a référence circulaire.
Serge m'a proposé la solution suivante qui marche mais n'est pas adaptée à
mon cas parce que mes cellules en A viennent d'un autre classeur et rien
ne
se met à jour..

macro devrait convenir pour toutes les lignes des colonnes AC et AJ :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 29 Or Target.Column = 36 Then
L = Target.Row
Cells(L, 36) = WorksheetFunction.Min(Cells(L, 29), Cells(L, 36))
End If
End Sub


Comment faire pour que cette fonction se lance correctement.
Merci pour votre aide

Jean-Pierre