Tableau avec activation de case

Bonjour les utilisateurs de CCM,

J'ai besoin de votre aide concernant un tableau que mon chef m'a demandé pour pouvoir comptabiliser les activités de ses collaborateurs.

Je cherche à créer un tableau comme suit:

Date:

.............Bureau.....Réunion....Pause....Congé...............BOUTON DE VALIDATION
Jean
Paul
Marie
Arnaud
Marine

Dans lequel il serait possible de "cocher/activer" des cases/bouton afin d'attribuer une tache à chaque personne.

Comme suite:

DATE: 12.05.2017

...........Bureau....Réunion....Pause....Congé...............BOUTON DE VALIDATION
Jean........X
Paul.........X
Marie..................X
Arnaud...............................X
Marine............................................X


Une fois que le tableau est rempli via l'activation des cases ou de boutons, j'aimerai pouvoir valider le tableau à l'aide d'un bouton de validation (via macro) qui redistribuerait les infos dans d'autres feuille du ficher.

L'idée est ensuite de pouvoir avoir les stats par personnes du genre sur la feuille de Jean:

Date...............Activité
12.05.2017......Bureau
XX.XX.XXXX.....etc


J'ai déjà crée une macro pour un autre tableau que je pense pouvoir adapter.


Sub Boutonenvoie()
'Atteindre le formulaire et mémoriser les données
Sheets("Formulaire").Select
Range("B1:B3").Select
Selection.Copy

'Test pour déterminer la ligne où coller les infos dans le tableau
Sheets("Base de données").Select
valeurA2 = Range("A2").Value
If valeurA2 = "" Then
Range("A2").Select
Else
Range("A1").Select
Selection.End(xlDown).Select
ligne_active_base = ActiveCell.Row
Range("A" & ligne_active_base + 1).Select
End If

'Memorise le n° de la ligne où coller les données
ligne_active_base = ActiveCell.Row

'Collage avec transposition
Range("A" & ligne_active_base).Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, _
Operation:=xlNone, SkipBlanks:=False, Transpose:=True

'Rendre vierge le formulaire
Sheets("Formulaire").Select
Range("B1:B3").Select
Selection.ClearContents
Range("B1").Select

End Sub


Je pense pouvoir l'adapter à mon tableau avec un peu de bricolage.

Par contre, je bloque sur le tableau et ses coches à activer et sur la façon d'insérer la commande qui prend en compte l'activation du bouton dans la macro.

J'espère que ma demande est assez claire. En cas de besoin, je peux sans autre développer plus.

Je vous remercie d'ores et déjà pour votre aide.

Théodorick