Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Vincnet.
Bonjour Cyril, Tu peux toujours le faire (en ayant prix soin dans Outils/Options/Calcul de cocher la case itération. Mais dès qu'une de tes cellules aura été renseignée, il n'y aura plus moyen de faire marche arrière... on ne peut pas avoir une formule ET une valeur dans une même cellule ! (c'est évident, certes mais bon...à=)
-- A+
V.
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Bonjour Cyril,
Tu peux toujours le faire (en ayant prix soin dans Outils/Options/Calcul de
cocher la case itération. Mais dès qu'une de tes cellules aura été
renseignée, il n'y aura plus moyen de faire marche arrière... on ne peut pas
avoir une formule ET une valeur dans une même cellule ! (c'est évident,
certes mais bon...à=)
--
A+
V.
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
Bonjour Cyril, Tu peux toujours le faire (en ayant prix soin dans Outils/Options/Calcul de cocher la case itération. Mais dès qu'une de tes cellules aura été renseignée, il n'y aura plus moyen de faire marche arrière... on ne peut pas avoir une formule ET une valeur dans une même cellule ! (c'est évident, certes mais bon...à=)
-- A+
V.
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
ru-th
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Salut
à mettre dans le module de la feuille concernée
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
End Sub
a+
rural thierry
"CyrilDébutAccess" <CyrilDbutAccess@discussions.microsoft.com> a écrit dans
le message de news: F902E400-0E9C-4941-A392-0EDC8C6A5943@microsoft.com...
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Misange
Bonjour
Pour faire dépendre une cellule d'une autre tu dois écrire dans cette cellule une formule Donc si tu veux que A1 affiche le contenu de B1, en A1 tu écris ± Si tu modifies B1, A1 se modifie aussi. Jusque là ça va. Maintenant si je comprends bien, tu voudrais écrire aussi B1¡ dans la cellule B1 ?
Le problème, maintes fois évoqué ici c'est qu'effectivement tu ne peux pas demander à excel de contenir SOIT une formule SOIT un résultat et de se souvenir de la formule si on la remplace par un résultat.
Une solution : ne permettre la modification que dans une seule des deux cellules et faire dépendre l'autre de celle-ci. Si tu poses la question, j'imagine que c'est que en A1 ton résultat peut par exemple être entré manuellement alors qu'en B1 il va dépendre d'un calcul fait ailleurs ? Si c'est ça, pour t'en sortir tu vas devoir faire appel à deux autres cellules : l'une (disons A10) dans laquelle éventuellement sera rentrée manuellement une valeur, l'autre (disons B10) dans laquelle tu mets une formule de ton choix. En A1 et en B1 alors tu peux taper une formule du type =si($A$10<>"";$a$10;$b$10) de sorte que s'il n'y a pas eu saisie manuelle, c'est la valeur de la cellule B10 qui sera reportée dans les deux cellules A1 et B1, sinon ce sera la valeur de A10.
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 11:52, :
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Bonjour
Pour faire dépendre une cellule d'une autre tu dois écrire dans cette
cellule une formule
Donc si tu veux que A1 affiche le contenu de B1, en A1 tu écris ±
Si tu modifies B1, A1 se modifie aussi. Jusque là ça va.
Maintenant si je comprends bien, tu voudrais écrire aussi B1¡ dans la
cellule B1 ?
Le problème, maintes fois évoqué ici c'est qu'effectivement tu ne peux
pas demander à excel de contenir SOIT une formule SOIT un résultat et de
se souvenir de la formule si on la remplace par un résultat.
Une solution : ne permettre la modification que dans une seule des deux
cellules et faire dépendre l'autre de celle-ci.
Si tu poses la question, j'imagine que c'est que en A1 ton résultat peut
par exemple être entré manuellement alors qu'en B1 il va dépendre d'un
calcul fait ailleurs ? Si c'est ça, pour t'en sortir tu vas devoir faire
appel à deux autres cellules : l'une (disons A10) dans laquelle
éventuellement sera rentrée manuellement une valeur, l'autre (disons
B10) dans laquelle tu mets une formule de ton choix.
En A1 et en B1 alors tu peux taper une formule du type
=si($A$10<>"";$a$10;$b$10)
de sorte que s'il n'y a pas eu saisie manuelle, c'est la valeur de la
cellule B10 qui sera reportée dans les deux cellules A1 et B1, sinon ce
sera la valeur de A10.
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 11:52, :
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
Pour faire dépendre une cellule d'une autre tu dois écrire dans cette cellule une formule Donc si tu veux que A1 affiche le contenu de B1, en A1 tu écris ± Si tu modifies B1, A1 se modifie aussi. Jusque là ça va. Maintenant si je comprends bien, tu voudrais écrire aussi B1¡ dans la cellule B1 ?
Le problème, maintes fois évoqué ici c'est qu'effectivement tu ne peux pas demander à excel de contenir SOIT une formule SOIT un résultat et de se souvenir de la formule si on la remplace par un résultat.
Une solution : ne permettre la modification que dans une seule des deux cellules et faire dépendre l'autre de celle-ci. Si tu poses la question, j'imagine que c'est que en A1 ton résultat peut par exemple être entré manuellement alors qu'en B1 il va dépendre d'un calcul fait ailleurs ? Si c'est ça, pour t'en sortir tu vas devoir faire appel à deux autres cellules : l'une (disons A10) dans laquelle éventuellement sera rentrée manuellement une valeur, l'autre (disons B10) dans laquelle tu mets une formule de ton choix. En A1 et en B1 alors tu peux taper une formule du type =si($A$10<>"";$a$10;$b$10) de sorte que s'il n'y a pas eu saisie manuelle, c'est la valeur de la cellule B10 qui sera reportée dans les deux cellules A1 et B1, sinon ce sera la valeur de A10.
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 11:52, :
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Misange
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1, t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1,
t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
End Sub
a+
rural thierry
"CyrilDébutAccess" <CyrilDbutAccess@discussions.microsoft.com> a écrit dans
le message de news: F902E400-0E9C-4941-A392-0EDC8C6A5943@microsoft.com...
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1, t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
ru-th
pour faire éviter une double application, la procédure se re déclenchant à la modification par macro de l'autre cellule préferer Private Sub Worksheet_Change(ByVal Target As Range) application.EnableEventsúlse If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target application.EnableEventsúlse End Sub a+ "ru-th" a écrit dans le message de news:
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans
le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
pour faire éviter une double application, la procédure se re déclenchant à
la modification par macro de l'autre cellule
préferer
Private Sub Worksheet_Change(ByVal Target As Range)
application.EnableEventsúlse
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
application.EnableEventsúlse
End Sub
a+
"ru-th" <ailleurs@nowhere.fr> a écrit dans le message de news:
OHREorwTFHA.612@TK2MSFTNGP12.phx.gbl...
Salut
à mettre dans le module de la feuille concernée
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
End Sub
a+
rural thierry
"CyrilDébutAccess" <CyrilDbutAccess@discussions.microsoft.com> a écrit
dans
le message de news: F902E400-0E9C-4941-A392-0EDC8C6A5943@microsoft.com...
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque
entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
pour faire éviter une double application, la procédure se re déclenchant à la modification par macro de l'autre cellule préferer Private Sub Worksheet_Change(ByVal Target As Range) application.EnableEventsúlse If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target application.EnableEventsúlse End Sub a+ "ru-th" a écrit dans le message de news:
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans
le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
ru-th
Salut tu peux prévoir Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1]) Is Nothing Then [b1] = formule1 If Not Intersect(Target, [b1]) Is Nothing Then [a1] = formule2 End Sub
a+ rural thierry "Misange" a écrit dans le message de news:
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1, t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans
le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
Salut
tu peux prévoir
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1]) Is Nothing Then [b1] = formule1
If Not Intersect(Target, [b1]) Is Nothing Then [a1] = formule2
End Sub
a+
rural thierry
"Misange" <misange@devinez-ou.net> a écrit dans le message de news:
ephWIzwTFHA.580@TK2MSFTNGP15.phx.gbl...
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1,
t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
End Sub
a+
rural thierry
"CyrilDébutAccess" <CyrilDbutAccess@discussions.microsoft.com> a écrit
dans
le message de news:
F902E400-0E9C-4941-A392-0EDC8C6A5943@microsoft.com...
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque
entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
Salut tu peux prévoir Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1]) Is Nothing Then [b1] = formule1 If Not Intersect(Target, [b1]) Is Nothing Then [a1] = formule2 End Sub
a+ rural thierry "Misange" a écrit dans le message de news:
effectivement vu comme ça ! mais si t'avais des formules dans A1 et B1, t'oublies ! elles seront effacées
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Le 02/05/2005 13:35, :
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans
le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
C'estv très cool ton truc, ca a tout de suite marché!!!
Mais j'ai une toute petite question: quand les deux cellules en question n'appartiennent pas au même classeur Excell, metton la cellule a1 ans le classeur poire et b1 pour le classeur cerise.
Comment s'écrit alors la formule [a1,b1]???
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance
C'estv très cool ton truc, ca a tout de suite marché!!!
Mais j'ai une toute petite question: quand les deux cellules en question
n'appartiennent pas au même classeur Excell, metton la cellule a1 ans le
classeur poire et b1 pour le classeur cerise.
Comment s'écrit alors la formule [a1,b1]???
Salut
à mettre dans le module de la feuille concernée
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target
End Sub
a+
rural thierry
"CyrilDébutAccess" <CyrilDbutAccess@discussions.microsoft.com> a écrit dans
le message de news: F902E400-0E9C-4941-A392-0EDC8C6A5943@microsoft.com...
Bonjour,
sans doute cette question a déjà été posée de nombreuses fois, mais je
n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre
deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et
indiquer à la seconde qu'elle est égale à la première, de sorte que le
changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante!
Merci d'avance
C'estv très cool ton truc, ca a tout de suite marché!!!
Mais j'ai une toute petite question: quand les deux cellules en question n'appartiennent pas au même classeur Excell, metton la cellule a1 ans le classeur poire et b1 pour le classeur cerise.
Comment s'écrit alors la formule [a1,b1]???
Salut
à mettre dans le module de la feuille concernée Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [a1,b1]) Is Nothing Then [a1,b1] = Target End Sub a+ rural thierry "CyrilDébutAccess" a écrit dans le message de news:
Bonjour, sans doute cette question a déjà été posée de nombreuses fois, mais je n'ai
pas réussi à la retrouver...
Je voudrais savoir s'il est possible de créer une égalité réciproque entre deux cellules.
C'est à dire, indiquer à la première qu'elle est égale à la seconde, et indiquer à la seconde qu'elle est égale à la première, de sorte que le changement de l'une comme de l'autre va changer la valeur de la seconde.
J'espère que quelqu'un pourra me sortir de cette situation angoissante! Merci d'avance