Proposition d'un défi

Bonjour a tous a toutes

j'aime beaucoup ce forum, il traite énormément de sujet et il dépanne beaucoup de personnes

je voudrais (si bien bien-sur les modérateurs de se forum nous l'autorise )pour ceux qui veulent participer, lancer un défi qui contribue en finalité a la réalisation d'un petit fichier Excel par rapport a un besoin bien-sur, mais sur le quel il y aura l'emprunt de tous le monde.

est ce que vous êtes d'accord ?

et pour les modérateur est ce qu'on peut le faire ici ?

merci par avance pour vos réponses

Bonjour,

La notion de défi n'est pas vraiment ce qui vient à l'esprit immédiatement lorsqu'on vient sur un Forum.

Tu souhaites la "réalisation d'un petit fichier Excel par rapport a un besoin ".

Je suppose que c'est un besoin chez toi.

Le Forum est prêt à t'aider dès lors que tu nous aides à t'aider.

Ce qui signifie de nous en dire un peu plus sur la finalité de ton projet et de nous fournir un fichier qui serait la trame de ce que tu souhaites.

Ensuite, au fil de tes questions et des réponses, ton projet devrait finir par voir le jour.

A te (re)lire

@+

Ok je suis d'accord

mais juste pour information je n'avais aucune mauvaise intention en proposant ça, c'est juste que je voulais proposer quelque chose qui formerait un groupe de travail pour l'élaboration de fichier suivant les demandes des personnes.

mais je tout a fait d'accord avec toi

re,

Pour moi (et je pense ne pas être le seul), l'objectif d'un Forum ne doit pas être d'élaborer des fichiers en fonction des demandes.

On est simplement là pour se faire plaisir en aidant les Excelliens en détresse devant un problème en apportant nos idées et nos compétences, mais pas pour faire du travail à la demande.

C'est mon simple avis et je le partage

Bon app

@+

ça marche

avant toute choses merci pour votre aide a l'avance

voici maintenant le fichier en question

presque tout est expliqué dans le fichier.

https://www.excel-pratique.com/~files/doc/Calcul_hebdo_de_performance.xls

si vous avez des question je suis a l'écoute.

bonne après midi

Bonsoir

Pour les dates et W-End à partir de la liste déroulante en B1

https://www.excel-pratique.com/~files/doc/ZuGy6Calcul_hebdo_de_performance.xls

Cordialement

, c'est super pour la date, mais comment pourrait-on faire maintenant pour insérer une colonne automatiquement pour chaque semaine? et cela pour calculer la moyenne hebdo, sans oublier que c'est ce même fichier qu'on va utiliser pour tous les autres mois

Bonjour

Bonjour

La nuit, je dors, inutile de s'affoler...

Les dates et colonnes

https://www.excel-pratique.com/~files/doc/Calcul_perfo_V2.xls

Cordialement

waw, franchement c'est super, trop fort...

mais gourmand comme je le suis, est ce que tu crois qu'il y a un moyen qu'une colonne se rajoute automatiquement dans la quelle il y aura les moyennes hebdo

Bonjour

Bien sur, que c'est possible, mais là, il faut passer par les macros et comme VBA n'est pas mon truc, ce sera aux spécialistes de s'exprimer.

Cordialement

https://www.excel-pratique.com/~files/doc/UVglHCalcul_perfo_V2.xls

comment faire maintenant

Quelques suggestions en vrac et mal dégrossies que tu trouveras dans ce code (je tourne un peu en rond au boulot cet aprèm... )

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B1")) Is Nothing Then

Dim cel As Range, col1 As Byte, col2 As Byte, ligfin As Byte
col1 = 3
ligfin = Range("A2").End(xlDown).Row
    With Range("C3:AC23")
    .ClearContents
    .Interior.ColorIndex = xlNone
    .NumberFormat = "0%"
    End With

For Each cel In Range("C2:AC2")
    If cel = "" And Not cel.Offset(0, -1) = "" Then
        col2 = cel.Column
            With cel.Offset(1, 0)
            .FormulaR1C1 = "=AVERAGE(RC[-" & col2 - col1 & "]:RC[-1])"
            .Interior.ColorIndex = 8
            .NumberFormat = "0.00"
            .AutoFill Destination:=Range(Cells(3, col2), Cells(ligfin, col2)), Type:=xlFillDefault
            End With
            With Range("C25")
            .FormulaArray = _
                "=AVERAGE(IF(R3C2:R" & ligfin & "C2=""TDP"",R3C:R" & ligfin & "C))"
            .AutoFill Destination:=Range("C25:AC25"), Type:=xlFillDefault
            End With
        col1 = col2 + 1
    End If
Next cel

For Each cel In Range("B3:B" & ligfin)
    If cel = "Taches" Then Range(Cells(cel.Row, 3), Cells(cel.Row, 29)).NumberFormat = "0"
Next cel

End If
End Sub

Explications en gros :

• la macro se lance quand on change la valeur de B2
• elle efface le contenu et la couleur de ta plage de données C2:AC23
• attribue un format de cellule pourcentage à toutes les "TDP" et "PERF", un format nombre à toutes les "Taches"
• écrit les formules = MOYENNE(semaine passée) dans les colonnes w-e

Pour le calcul des moyennes globales quotidiennes et hebdomadaires, je suggère une formule matricielle puisque j'ai enfin réussi à comprendre un bout du principe :

en C25 :

=MOYENNE(SI($B$3:$B$11="TDP";C$3:C$11))

en C26 :

=MOYENNE(SI($B$3:$B$11="PERF";C$3:C$11))

en C27 :

=MOYENNE(SI($B$3:$B$11="Taches";C$3:C$11))

Formules à valider par Ctrl + Maj + Entrée, puis à étirer vers la droite

PS : je ne pourrai certainement pas donner trop de suite, étant donné que je n'ai plus internet à la maison... Donc si quelqu'un peut embrayer dessus pas de soucis

Oh c'est génial, merci beaucoup et franchement ça avance super bien