si cellule active, alors encadre cellule associée

[olivowitch]

Bonjour,

je souhaiterai de l'aide dont je n'ai trouvé aucune info sur le forum pour le moment.
Excel 2007_débutant

J'ai 2 tableaux : tableau 1 (B5:E8) et tableau 2 (G5:J8)

Je voudrai que lorsque je sélectionne la cellule B5 dans le tableau1, la cellule G5 s'encadre en rouge. Et quand la cellule B5 n'est plus sélectionnée, que G5 ne soit plus encadrer en rouge.
(Pour l'encadrement en rouge je n'ai pas de souci)

Je vous remercie

Olivowitch

 

[pierrejean]

Re : si cellule active, alors encadre cellule associée

Bonjour olivowitch

Vois si cela te convient

 

[James007]

Re : si cellule active, alors encadre cellule associée

Bonjour à tous, Salut pierrejean 🙂

Encadré rouge sur ta plage de travail ... voir fichier test joint ...

A +
🙂

 

[James007]

Re : si cellule active, alors encadre cellule associée

Bonjour olivowitch
Vois si cela te convient

Bonjour Pierrejean,

Ta solution est plus pertinente et plus élégante ... 🙂

A +
🙂

 

[olivowitch]

Re : si cellule active, alors encadre cellule associée

Bonjour Pierrejean et James007.

Merci pour vos 2 solutions, elles fonctionnent parfaitement.

Bonne journée

 

[job75]

Re : si cellule active, alors encadre cellule associée

Bonjour olivowitch, salut pierrejean, James,

Autre solution avec cette macro :

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

Voyez sur le fichier joint les bordures et la MFC de la plage G5:J8.

pierrejean, c'est la 1ère fois que nous nous croisons cette année, tous mes voeux 🙂

A+

 

[pierrejean]

Re : si cellule active, alors encadre cellule associée

Re

Meilleurs voeux Job (ainsi qu'a James ,olovowitch et tout le forum)
pour info ,les MFC ayant évolué ta trés élégante solution ne fonctionne plus a compter de 2007

 

[job75]

Re : si cellule active, alors encadre cellule associée

Re pierrejean,

J'ai été testé sur mon (nouveau) portable avec Excel 2010.

Effectivement le contour rouge (couleur vraie des bordures) ne s'affiche que partiellement.

J'ai alors mis la couleur rouge dans le format de la MFC, et là pas de problème.

Mais on ne peut mettre qu'une bordure fine, le look n'est pas fameux...

Mieux vaut alors colorer toute la cellule, voir fichier (2).

A+

 

[olivowitch]

Re : si cellule active, alors encadre cellule associée

Bonsoir,

Ton système marche très bien Job75, j'ai mis du temps à répondre car étant débutant, je travaille à comprendre comment ça marche.
Je vais donc garder cette manière de faire car je serai la refaire. (Les macros de James et Pierrejean marche parfaitement mais elles sont à l'heure actuelle d'un niveau nettement supérieur à ce que je suis capable de faire 😱 )

Encore merci à tous.

Bonne soirée

 

[olivowitch]

Re : si cellule active, alors encadre cellule associée

Salut,

je reviens vers vous pour voir si une modification est possible.
Si je sélectionne plusieurs cellules, une colonne par exemple, seule une est colorée (ou encadrée).
est-il possible de colorer toutes les cellules que je choisis de sélectionner dans le tableau?

Merci

 

[James007]

Re : si cellule active, alors encadre cellule associée

Bonjour,

Tu dis

est-il possible de colorer toutes les cellules que je choisis de sélectionner dans le tableau

Mais parles-tu effectivement de celles que tu sélectionnes, ou de leur "miroir" dans le second tableau ...
SI tu parles de celles qui sont dans le second tableau, quel est l'intérêt ? puisque tu perds totalement l'effet de la mise en avant de la cellule encadrée initiale ...

A +
🙂

 

[job75]

Re : si cellule active, alors encadre cellule associée

Bonjour olivowitch, le fil, le forum,

Pour une plage de cellules, voyez le fichier (3) joint.

Le nom défini test utilise la fonction macro Excel 4.0 SELECTION().

Pas encore testé sous Excel 2010, j'y vais de ce pas Edit : testé sans problème.

A+

 

[olivowitch]

Re : si cellule active, alors encadre cellule associée

Salut James007 & Job75

@ James007 : dans le tableau que je vais faire (Qui aura plus de cellules que celui du test), certaines données pourront être liées avec la variation d'un paramètre entres-elles. Du coup, pour faire la comparaison entre les 2 valeurs, mettre en couleur les 2 cellules choisis sera pratique.

@ Job75 : ça fonctionne très bien.
Il y a juste à faire attention dans la formule donnée dans le document test(3), il y a eu une petite erreur : =ESTREF(SELECTION() Feuil1!IB5)
Il faut enlever le I ==> =ESTREF(SELECTION() Feuil1!B5).

Encore merci pour les explications et pour votre aide.

Bonne journée

 

[job75]

Re : si cellule active, alors encadre cellule associée

Re,

Tenez olovowitch, voici quelque chose qui devrait vous amuser.

La macro (j'espère que vous la comprendrez) :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim sel As Range
On Error Resume Next
Set sel = Intersect(Target.Offset(, 5), [G5:J8])
Application.EnableEvents = False
Union(Target, sel).Select
Application.EnableEvents = True
End Sub

Plus besoin de colorer la 2ème plage 😉

Fichier joint.

Edit : testé sous Excel 2003, en fait on peut enlever les Application.EnableEvents...

A+

 

[olivowitch]

Re : si cellule active, alors encadre cellule associée

Re,

exacte, rapide et efficace!
Je conserve pour mon tableau votre précédente solution. La couleur mettra un peu de gaieté dans mon tableau 🙂. Mais je sais comment celle-ci va m'être utile.

Encore merci.

Bonne journée