Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Planning interactif

  • Initiateur de la discussion Initiateur de la discussion Benjy
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Benjy

XLDnaute Occasionnel
Bonjour à tous !

Je reviens vers vous pour une petite aide.
Je cherche à faire un planning intéractif sur excel.

En gros j'ai des noms, les jours de la semaine et les numéros de semaines.

J'ai fait un tableau tout à fait basique que je joins en pièce jointe.
Ce que j'aimerais améliorer à présent c'est que lorsque je clique dans la case " semaine " j'ai la liste de toutes les semaines. Et que bien sur lorsque j'en choisis une le planning correspondant s'affiche.
Est-ce possible ? Et si oui comment faire ?

Faut il créer autant de tableau que de semaine ? Ou y'a t'il une solution moins lourde est plus simple ?

Merci de votre aide
 

Pièces jointes

Re : Planning interactif

Bonjour Benjy, le forum,

A mon sens, il faut que les données soient stockées quelque part (que ce soit Excel, Access, ou externalisé ailleurs). Par exemple (mais ça peut être lourd) :
- avoir 52 onglets avec chaque semaine
- mettre les 52 semaines sur la feuille

Puis, ajouter un morceau de code vba qui permet de naviguer entre les semaines (cela peut se faire facilement en ajoutant un bouton dans une barre de menu).

Bon courage,

--
macsscam
 
Re : Planning interactif

Bonjour Benjy,

Faut il créer autant de tableau que de semaine ? Ou y'a t'il une solution moins lourde est plus simple ?

Comment voulez-vous qu'Excel affiche des plannings qui n'existent pas 🙄

Voyez le fichier joint.

La colonne A est au format personnalisé "SEMAINE"0

La macro suivante se lance quand on double-clique sur n'importe quelle cellule :

Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim S As String, lig
Cancel = True
1 S = InputBox("Entrez le n° de la semaine :", "Afficher une semaine")
If S = "" Then Exit Sub
If Int(Val(S)) = 0 Then GoTo 1
lig = Application.Match(Int(Val(S)), Columns(1), 0)
If IsError(lig) Then MsgBox "Semaine introuvable...": GoTo 1
Application.Goto Cells(lig, 1), True 'cadre la semaine trouvée
End Sub

Pour voir la macro, clic droit sur l'onglet => Visualiser le code.

Edit : salut macsscam

A+
 

Pièces jointes

Dernière édition:
Re : Planning interactif

Comment voulez-vous qu'Excel affiche des plannings qui n'existent pas 🙄

😀 dit comme sa c'est sur.
Je pensais affecter les données à un numéro de semaine plutôt que de faire 50 fois le tableau. Et donc de stocker uniquement les données et pas 50 fois les noms, les jours etc.. ce qui aurait été un poil moins lourd. C'est l'idée que j'essayais de faire passer.

Merci pour ton fichier, sa me convient.

Merci pour votre aide, encore une fois très rapide.

A +
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
0
Affichages
304
  • Question Question
XL 2021 planning
Réponses
5
Affichages
432
Réponses
5
Affichages
352
Réponses
4
Affichages
309
Réponses
4
Affichages
365
Réponses
17
Affichages
781
Réponses
3
Affichages
478
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…