Planning de garde

[jemid]

Vérouiller une case

Bonjour,

Je fais actuellement le planning de garde du service d'anesthésie et j'ai un soucis 😱.
En faite quand un agent est de garde il doit être en repos le lendemain.... sauf que très souvent, par erreur, il se retrouve sur le planning, à travailler. Ce qui entraine des problème dans l'organisation du service, puisqu'il ne sera pas là...
Je monte un tableur dans lequel je voudrais que le lendemain de chaque garde "représenté par G" sur le planning, il soit impossible d'entrer une donnée.... Est ce possible?

Merci pour votre aide

 

[CISCO]

Re : Planning de garde

Bonjour

Envoies nous un petit bout de fichier. Cela sera nettement plus facile et précis pour pouvoir t'aider.

@ plus

 

[jemid]

Re : Planning de garde

Re...

Je joins le fichier...

Merci pour vos réponses et votre aide..

🙂

 

[alex67800]

Re : Planning de garde

Bonsoir jemid, cisco,

Rajoute ces deux codes dans ta feuille1 (clic droit dans l'onglet, visulaliser le code):

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C4:AG16")) Is Nothing Then
Cancel = True
If Target.Value = "G" Then Target.Offset(0, 1).Value = "X"

End If

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("C4:AG16")) Is Nothing Then
Cancel = True
If Target.Value = "X" Then MsgBox ("attention il y a déjà une garde planifiée la veille!!!!"): Exit Sub

End If

End Sub

Premier code:
Dès que tu saisies un G la cellule adjacente affiche un X.

Deuxième code:
Si tu veux changer une cellule X, un message t'informe qu'une garde est déjà planifiée la veille.

Dis nour si cela te convient.

 

[JHA]

Re : Planning de garde

Bonjour Jemid, le forum,

Il me semble que Kjin a fourni une solution la dessus qui fonctionne très bien.

Ci joint ton fichier avec la plage D4:AG16 possédant un controle de saisie avec données/validation/personnalisé

JHA