Nombre de personnes présentes par 1/2 heure

  • Initiateur de la discussion Initiateur de la discussion judikael
  • 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 !

judikael

XLDnaute Occasionnel
Bonjour le Forum

j'ai un fichier où j'ai par jour et par collaborateur leur heure d'arrivée, l'heure de départ en pause déjeuner et l'heure de fin de journée. Et j'ai une ligne par jour

J'ai besoin de savoir de manière synthétique le nombre de personnes planifiées par 1/2h afin de voir si j'ai l'effectif nécessaire

je ne sais pas comment automatiser cela afin que si je change une donnée dans le 1er tableau, cela modifie le second automatiquement

Je vous joins un fichier (car je ne suis pas certain d'avoir été clair

Merci de votre aide qui est pour moi à chaque fois si précieuse

PP
 

Pièces jointes

Re : Nombre de personnes présentes par 1/2 heure

Peut-être un début de solution en VB

Code:
Sub Test()
Dim i As Integer
Dim j As String
[E29].Value = 0
[D3].Select
While ActiveCell.Value <> 1
j = ActiveCell.Value
k = IsNumeric(j)
If k = True Then
   If ActiveCell.Value < 8.5 Then [E29].Value = [E29].Value + 1
   ActiveCell.Offset(0, 4).Select
Else
ActiveCell.Offset(0, 4).Select
End If
Wend
[E29].Select
End Sub
 
Re : Nombre de personnes présentes par 1/2 heure

Peut-être un début de solution en VB

Code:
Sub Test()
Dim i As Integer
Dim j As String
[E29].Value = 0
[D3].Select
While ActiveCell.Value <> 1
j = ActiveCell.Value
k = IsNumeric(j)
If k = True Then
   If ActiveCell.Value < 8.5 Then [E29].Value = [E29].Value + 1
   ActiveCell.Offset(0, 4).Select
Else
ActiveCell.Offset(0, 4).Select
End If
Wend
[E29].Select
End Sub


Merci beaucoup, je vais tester cela
 
Re : Nombre de personnes présentes par 1/2 heure

Bonjour judikael
Bonjour kllmoon

Ton problème est interessant, mais je pense que tu vas devoir fonctionner autrement que sur ton fichier présenté (je n'ai malheureusement pas de suggestion appropriée)
VBA me semble cependant incontournable dans ce cas précis, sauf si nos amis de XLD te sortent une formule super magique de derriere les fagots comme ils savent si bien le faire 🙂
Cdt

Edit: J'ai peut-etre trouvé une solution (cf pièce jointe), il convient bien sur de le remettre en forme, la mise en forme actuelle est très sobre 🙂
 

Pièces jointes

Dernière édition:
- 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
5
Affichages
427
Retour