Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour, Avec cette formule tu devrais avoir ton résultat recherché :
=MOYENNE(DECALER($C$1;EQUIV(MAX(C:C);$C:$C;0)-5;0;5;1))
Sur ton fichier l'on fait la moyenne de ces cellules ce qui donne 33,52
33,5
33,52
33,52
33,52
33,54
Bonjour,
Voilà, je t'ai fait une fonction personnalisée qui te fourni le résultat en bleu :)
Public Function rec_val(cpt, dev)
Const ong = "1,2,19,20" ' feuilles recherche
Dim feu ' feuille recherchée
Dim idf As Integer ' indice feuille
Dim c_t As Range ' position...
re
Alors, voilà ta macro que j'ai mise dans la feuille Recap
afin de refaire tes cumuls à chaque fois que tu l'affiches.
Bien entendu les cellules non numériques sont ignorées et donc j'ai enlevé tes 'val'
Edit fichier corrigé
Bonjour,
Ton projet est sans doute faisable mais sa complexité n'est pas facile à appréhender quand l'on ne connait pas l'environnement.
Peut-être pourrais-tu utiliser l'enregistreur de macro pour initier ta procédure.
Bonsoir
@patrickm
Je t'ai rectifié tes option Boutons avec une macro que j'ai mise sur la feuille et qui peut être utilisée pour rajouter des phases ou faire un contrôle.
Bonjour
Comme tes cases à cocher ne sont liées à aucun événement l'on ne peut pas éviter qu'elles soit cliquées.
Cependant je t'ai mis en place une procédure qui fait que si tu valides à tort, le simple changement de sélection va remettre en place ta cellule et si tu valides à raison ta case...
Bonjour,
Tu es dans ton affaire et tu sais sans doute le résultat que tu veux,
mais pour quelqu'un d'extérieur c'est le brouillard complet
car doit-on déplacer les fichiers ou seulement les noms et où ?
Personnellement je n'ai pas compris.
Comme tu dis c'est tout bête car "id=""kmslinearecta"">") est créé vide puis affiché par une fonction javascript et donc dans ton texte récupéré il est vide.
Bonjour,
Je crois bien que tu as oublié quelque chose car pour mettre le guillemet dans une formule il faut le doubler
WsDst.Range("W" & DerligDst).FormulaLocal = "=SIERREUR(CNUM(STXT(F" & DerligDst & ";MIN(SI(ESTNUM(CHERCHE({0;1;2;3;4;5;6;7;8;9};F" & DerligDst &...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.