Planning interactif

[Benjy]

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

 

[macsscam]

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

 

[job75]

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 :

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+

 

[Benjy]

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 +