Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Couleur de remplissage en fonction de la cellule active

8 réponses
Avatar
gueridon
Rebonjour,

est-il possible de faire en sorte de mettre une couleur de fond sur
l'ensemble de la colonne et de la ligne de la cellule active ? (ex si je suis
en A1, mettre à la colonne A et à la ligne 1 une couleur de remplissage).

Merci d'avance
Pascal

8 réponses

Avatar
JB
Bonjour,


http://cjoint.com/?mbnwCElJHu

-Sélectionner le champ A2:D16
-Format/Mise en forme Conditionnelle
=LIGNE()LLULE("ligne")
=COLONNE()LLULE("colonne")


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub

Cordialement JB
Avatar
gueridon
Impeccable.

En abusant, sans doute en VBA, y-a-t-il un moyen, si la mise en forme se
fait sur une zone où il y avait déjà une couleur de remplissage, de récupérer
la couleur de fond initiale quand la cellule active quitte cette zone

Pascal


Bonjour,


http://cjoint.com/?mbnwCElJHu

-Sélectionner le champ A2:D16
-Format/Mise en forme Conditionnelle
=LIGNE()ÎLLULE("ligne")
=COLONNE()ÎLLULE("colonne")


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub

Cordialement JB




Avatar
JB
Je ne comprends pas!
Lorsque l'on quitte la zone, elle doit reprendre sa couleur de
remplissage (on utilise une MEFC).

JB
Avatar
Modeste
Bonsour®
gueridon wrote:
est-il possible de faire en sorte de mettre une couleur de fond sur
l'ensemble de la colonne et de la ligne de la cellule active ? (ex si je
suis
en A1, mettre à la colonne A et à la ligne 1 une couleur de remplissage).


voilà exactement ce qu'il te faut :
http://www.polykromy.com/nl/nl6/nl6.html#as2

;o)))
@+

--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr

Avatar
AV
Sélection de l'ensemble de la feuille > Format > MEFC > la formule est :
=OU(CELLULE("colonne")=COLONNE();CELLULE("row")=LIGNE())
Motif...etc


Dans le module de la feuille :

Private Sub Worksheet_SelectionChange(ByVal zz As Range)
Calculate
End Sub

AV

Avatar
Modeste
Bonsour® AV
alors là tu m'épates ;o)))
j'avais essayé :
=OU(CELLULE("column")=COLONNE();CELLULE("row")=LIGNE())
sans succès... ?????
toi ... en mélangeant les genres ça fonctionne !!!
sur le cul .....
on m'avait pourtant dit d'utiliser de préférence la syntaxe US
c'est ce qui m'a fait re-essayer ta formule
en toute logique d'ailleurs tu aurais du écrire :
=OU(CELLULE("colonne")=COLONNE();CELLULE("ligne")=LIGNE())
et non
=OU(CELLULE("colonne")=COLONNE();CELLULE("row")=LIGNE())

bizarre tout ça ....
;o)))
@+


--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
Avatar
Modeste
Bonsour®
ce mystère m'ayant intrigué...
j'ai trouvé mon erreur...
la syntaxe US correcte est :
=OU((CELLULE("Col")=COLONNE());CELLULE("Row")=LIGNE())
je présente mes excuses à JB vis-à-vis de l'antériorité de sa réponse
et qui ne faisait pas encore partie des contributeurs auxquels j'applique
une règle de message ;o)))

--
;o)))
@+

Les news à la source !!!
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :http://www.excelabo.net
http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr

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

Bonsour® AV
alors là tu m'épates ;o)))
j'avais essayé :
=OU(CELLULE("column")=COLONNE();CELLULE("row")=LIGNE())
sans succès... ?????
toi ... en mélangeant les genres ça fonctionne !!!
sur le cul .....
on m'avait pourtant dit d'utiliser de préférence la syntaxe US
c'est ce qui m'a fait re-essayer ta formule
en toute logique d'ailleurs tu aurais du écrire :
=OU(CELLULE("colonne")=COLONNE();CELLULE("ligne")=LIGNE())
et non
=OU(CELLULE("colonne")=COLONNE();CELLULE("row")=LIGNE())

bizarre tout ça ....
;o)))
@+


--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft.public.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr




Avatar
AV
en toute logique d'ailleurs tu aurais du écrire :


Pfff....
Le mélange des genres (syntaxe US et Gauloise) était justement fait pour
attirer l'attention !
Quant à savoir pourquoi l'argument "column" est obstinément refusé ben....
j'ai jamais compris !

PS : Pour éviter une mise à jour un poil erratique de l'écran, il est
souhaitable de mettre un "Application.ScreenUpdating = False" avant le
"Calculate" dans la proc évènementielle.

AV