Affichage dynamique et conditionné de contenu de cellule Fermé

Question

Bonjour à tous,
J'essaie de faire un fichier Excel dynamique entre deux feuilles du même classeur, de telle façon que le contenu de la 2e feuille change en fonction de la cellule active dans la 1e feuille.
J'ai réussi, grâce à une petite macro, à faire afficher le contenu de la cellule active dans la cellule de mon choix sur la feuille 2. Mais mes requêtes sont un peu plus techniques, du genre à coder avec des conditions "si()..." (si la cellule active est dans tel rang, alors il faut renvoyer telle valeur...), mais là ça devient hors de portée pour moi en macro, d'où ma question sur ce site.


Ce que j'ai en ce moment (sur l'image), c'est donc une cellule (en Feuille 2) qui se met à jour selon la cellule active (en Feuille 1).
Ce qu'il me faudrait, c'est, lorsque cette même cellule active est sélectionnée en Feuil1, que en Feuil2 s'affiche le nom du mois ainsi que la semaine (les nombres autour de la cellule sélectionnée), un peu comme si c'était une sélection réduite de la feuille 1 (en rouge sur l'image ci-dessous):


Pour info, le code (très basique) que j'ai pour afficher les résultats sur l'image 1 est:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(1, 22).Value = ActiveCell.Value
End Sub

(et ma cellule en Feuil2 est égale à la cellule (1,22) en Feuil1).

Merci d'avance pour votre aide!!

Le Pingou · Answer

Bonjour,
Merci de mettre votre classeur sur https://www.cjoint.com/  et poster le lien.

one2three4 · Answer

Bonjour,

Merci pour votre suggestion; le classeur se trouve sur https://www.cjoint.com/c/FCbrVcwiuho

Cordialement

Le Pingou · Answer

Bonsoir,
Voici ma proposition : https://www.cjoint.com/c/FCbvWeqQgls
Note : ce calendrier n’est pas réaliste au niveau des jours des mois (28 29 30 31) et de l’année.

one2three4 · Answer

Merci beaucoup Le Pingou! C'est exactement ce que je cherchais!
Je vais jeter un coup d'oeil à la macro pour tenter de me familiariser avec la logique...
Merci encore pour cette aide très utile
Cordialement

one2three4 · Answer

Je m'adresse de nouveau à vous pour une petite question qui se rapporte à ce sujet et qui dérive de la réponse que vous m'avez faite.
J'ai compris le code que vous avez écrit (il m'a fallu du temps!) et j'ai essayé d'appliquer la même logique pour une autre requête: sur le feuillet "Détails", en dessous de la ligne où est copiée la semaine sélectionnée, j'aimerais faire apparaître les commentaires de ces cellules (sur la semaine sélectionnée).

En essayant de continuer la logique codée dans votre macro, j'ai ajouté cette ligne de code: 

.Range("B7:H7") = Range(Cells(Target.Row, pco), Cells(Target.Row, pco + 6)).Comment

(copie d'écran jointe)


Cependant cela me donne une erreur... Voyez-vous où elle se situe?

Merci d'avance

Le Pingou · Answer

Bonjour pour commencer,
Je vous rappelle ceci :
Note : ce calendrier n’est pas réaliste au niveau des jours des mois (28 29 30 31) et de l’année
Vous ne pouvez pas déterminer la semaine exacte dans ce cas… !

Le Pingou · Answer

Bonjour,
Merci.
Salutations

Le Pingou · Answer

Bonjour,
Ouf, j’ai oublié pour ceci : 
(……..active) la ligne "semaine", afficher les commentaires présents sur les 7 cellules de cette ligne
Ou se trouvent les commentaires  ………pour les afficher il faut qu’ils existent …..Oui / Non … ! 
 
 
Salutations.
Le Pingou