Adapter formule

Le 10/12/2017 à 18:49

Bonsoir a toutes et tous,

1-Voilà je réalise un fichier de dotation via un formulaire,

Jers19 m’a gentiment donnée cette formule pour un gain de temps dans mes tableaux

En vue de dégager des statistiques.

Voici la formule :

=SOMMEPROD((INDIRECT(Q$1&"!$B$3:$B$250")=$P2)*(INDIRECT(Q$1&"!L3C"&EQUIV($P$1;INDIRECT(Q$1&"!$A$2:$S$2");0)&":L250C"&EQUIV($P$1;INDIRECT(Q$1&"!$A$2:$S$2");0);FAUX)))

Que j’ai adapté au fichier sauf que sur certains critères la réponse est « oui » et je pense que la formue n’accepte pas de lettres j’ai une erreur dans l’onglet (recup données) car dans les colonnes = E,F ,G,H,I,J,O,P,Q. la réponse est (oui) et non 1

Je joins mon fichier avec une donnée en décembre pour que vous puissiez voir dans l’onglet récup données les erreurs en colonne BF ( N&B_A4)

Et AQ (recto-simple).

2- lorsque je rentre une donnée via le formulaire celui-ci met 15 secondes pour le basculer dans la feuille concernée, alors que le fichier n’est pas encore chargé de données.

Y a-t-il qque chose a faire, merci pour vos conseils.

J’espère avoir était clair pour vous, je reste à votre disposition.

Merci

11fichier-excel-dotation-essaie-formules.xlsm (469.40 Ko)
Le 10/12/2017 à 22:10

Bonsoir,

le plus simple serait de mettre VRAI au lieu de OUI, car le VRAI est considéré comme 1 dans les calculs.

vbMBHB

Le 11/12/2017 à 07:01

bonjour et merci pour ta réponse vbMsgBoxHelpButton,

j'ai fais les modifications mais cela n'a rien changer

  Range("a" & num) = TBDate.Value 
            Range("b" & num) = CBServices.Value                            
            Range("c" & num) = TBDocument.Value                         
            Range("d" & num) = TBImprimé.Value                        
            Range("E" & num) = IIf(CBNoirA4.Value = True, "vrai", "")        
            Range("F" & num) = IIf(CBNoirA3.Value = True, "vrai", "")        
            Range("G" & num) = IIf(CBCouleurA4.Value = True, "vrai", "")  
            Range("H" & num) = IIf(CBCouleurA3.Value = True, "vrai", "") 
            Range("i" & num) = IIf(CBSimple.Value = True, "vrai", "")
            Range("j" & num) = IIf(CBRecto.Value = True, "vrai", "")
            Range("k" & num) = TBAgraphe.Value
            Range("l" & num) = TBSpirale.Value
            Range("m" & num) = TBThermo.Value
            Range("n" & num) = TBLivret.Value
            Range("o" & num) = IIf(CBPlasA4Nor.Value = True, "vrai", "")
            Range("p" & num) = IIf(CBPlasA3Nor.Value = True, "vrai", "")
            Range("q" & num) = IIf(CBPlasA4Plas.Value = True, "vrai", "")
            Range("r" & num) = TBPages.Value

dans la feuille calcul:

N&B_A4    Janvier    Février    Mars    Avril    Mai    Juin    JuilletAoûtSeptembreOctobreNovembreDécembre
D-G    0    0    0    0    0    0    0    0    0    0    0    #VALEUR!
B-D-M    0    0    0    0    0    0    0    0    0    0    0    #VALEUR!

merci et en se qui concerne la lenteur du fichier as tu une idée ??

merci

Le 11/12/2017 à 09:37

Bonjour,

pourtant sur le fichier transmis, lorsque qu'à la place de oui j'ai inscris "VRAI", la feuille récupe m'a bien indiqué "1" en décembre au lieu de "erreur"... Du coup je ne comprend pas...

vbMBHB

Le 11/12/2017 à 16:58

merci pour ta réponse je continu de chercher si tu as une info pense à moi

Cordialement

Rechercher des sujets similaires à "adapter formule"