Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 reduire ma formule

L

LEPATOCHE

XLDnaute Occasionnel
Bonsoir a tous
ma question est la suivante est t'il possible de reduire ma formule que je viens de marquer en dessous =(NB.SI($B$2:$U$2;$V2)+NB.SI($B$2:$U$2;$W2)+NB.SI($B$2:$U$2;$X2)+NB.SI($B$2:$U$2;$Y2)>3)*"1"+(NB.SI($B$3:$U$3;$V2)+NB.SI($B$3:$U$3;$W2)+NB.SI($B$3:$U$3;$X2)+NB.SI($B$3:$U$3;$Y2)>3)*"1"+(NB.SI($B$4:$U$4;$V2)+NB.SI($B$4:$U$4;$W2)+NB.SI($B$4:$U$4;$X2)+NB.SI($B$4:$U$4;$Y2)>3)*"1"+(NB.SI($B$5:$U$5;$V2)+NB.SI($B$5:$U$5;$W2)+NB.SI($B$5:$U$5;$X2)+NB.SI($B$5:$U$5;$Y2)>3)*"1"+(NB.SI($B$6:$U$6;$V2)+NB.SI($B$6:$U$6;$W2)+NB.SI($B$6:$U$6;$X2)+NB.SI($B$6:$U$6;$Y2)>3)*"1"+(NB.SI($B$7:$U$7;$V2)+NB.SI($B$7:$U$7;$W2)+NB.SI($B$7:$U$7;$X2)+NB.SI($B$7:$U$7;$Y2)>3)*"1"+(NB.SI($B$8:$U$8;$V2)+NB.SI($B$8:$U$8;$W2)+NB.SI($B$8:$U$8;$X2)+NB.SI($B$8:$U$8;$Y2)>3)*"1"+(NB.SI($B$9:$U$9;$V2)+NB.SI($B$9:$U$9;$W2)+NB.SI($B$9:$U$9;$X2)+NB.SI($B$9:$U$9;$Y2)>3)*"1"+(NB.SI($B$10:$U$10;$V2)+NB.SI($B$10:$U$10;$W2)+NB.SI($B$10:$U$10;$X2)+NB.SI($B$10:$U$10;$Y2)>3)*"1"+(NB.SI($B$11:$U$11;$V2)+NB.SI($B$11:$U$11;$W2)+NB.SI($B$11:$U$11;$X2)+NB.SI($B$11:$U$11;$Y2)>3)*"1"+(NB.SI($B$12:$U$12;$V2)+NB.SI($B$12:$U$12;$W2)+NB.SI($B$12:$U$12;$X2)+NB.SI($B$12:$U$12;$Y2)>3)*"1"+(NB.SI($B$13:$U$13;$V2)+NB.SI($B$13:$U$13;$W2)+NB.SI($B$13:$U$13;$X2)+NB.SI($B$13:$U$13;$Y2)>3)*"1"+(NB.SI($B$14:$U$14;$V2)+NB.SI($B$14:$U$14;$W2)+NB.SI($B$14:$U$14;$X2)+NB.SI($B$14:$U$14;$Y2)>3)*"1"+(NB.SI($B$15:$U$15;$V2)+NB.SI($B$15:$U$15;$W2)+NB.SI($B$15:$U$15;$X2)+NB.SI($B$15:$U$15;$Y2)>3)*"1"+(NB.SI($B$16:$U$16;$V2)+NB.SI($B$16:$U$16;$W2)+NB.SI($B$16:$U$16;$X2)+NB.SI($B$16:$U$16;$Y2)>3)*"1"+(NB.SI($B$17:$U$17;$V2)+NB.SI($B$17:$U$17;$W2)+NB.SI($B$17:$U$17;$X2)+NB.SI($B$17:$U$17;$Y2)>3)*"1"+(NB.SI($B$18:$U$18;$V2)+NB.SI($B$18:$U$18;$W2)+NB.SI($B$18:$U$18;$X2)+NB.SI($B$18:$U$18;$Y2)>3)*"1"+(NB.SI($B$19:$U$19;$V2)+NB.SI($B$19:$U$19;$W2)+NB.SI($B$19:$U$19;$X2)+NB.SI($B$19:$U$19;$Y2)>3)*"1"+(NB.SI($B$20:$U$20;$V2)+NB.SI($B$20:$U$20;$W2)+NB.SI($B$20:$U$20;$X2)+NB.SI($B$20:$U$20;$Y2)>3)*"1"+(NB.SI($B$21:$U$21;$V2)+NB.SI($B$21:$U$21;$W2)+NB.SI($B$21:$U$21;$X2)+NB.SI($B$21:$U$21;$Y2)>3)*"1"+(NB.SI($B$22:$U$22;$V2)+NB.SI($B$22:$U$22;$W2)+NB.SI($B$22:$U$22;$X2)+NB.SI($B$22:$U$22;$Y2)>3)*"1"+(NB.SI($B$23:$U$23;$V2)+NB.SI($B$23:$U$23;$W2)+NB.SI($B$23:$U$23;$X2)+NB.SI($B$23:$U$23;$Y2)>3)*"1"+(NB.SI($B$24:$U$24;$V2)+NB.SI($B$24:$U$24;$W2)+NB.SI($B$24:$U$24;$X2)+NB.SI($B$24:$U$24;$Y2)>3)*"1"+(NB.SI($B$25:$U$25;$V2)+NB.SI($B$25:$U$25;$W2)+NB.SI($B$25:$U$25;$X2)+NB.SI($B$25:$U$25;$Y2)>3)*"1"+(NB.SI($B$26:$U$26;$V2)+NB.SI($B$26:$U$26;$W2)+NB.SI($B$26:$U$26;$X2)+NB.SI($B$26:$U$26;$Y2)>3)*"1"

je ne peus pas vous envoyer mon fichier ni le reduire car trop volumineux merci de votre aide !
 
Trier par date Trier par votes

Staple1600

XLDnaute Barbatruc
Bonjour le fil, LEPATOCHE, djidji

On peut toujours réduire un fichier
Ou mieux on créé un fichier ex-nihilo avec une ou deux feuilles
et sur ces feuilles 5 à 20 lignes de données
Pas d'image, pas de couleurs, pas de bordures, pas d'arrière plan
pas de N modules vides dans le projet
On obtient alors un beau fichier exemple qui ne sert qu'à illustrer la problématique rencontrée.
Et si on décide d'étoffer un peu le fichier exemple, on peut alors le compresser (puisque le forum accepte le fichier *.zip)

Un fichier exemple ne devrait jamais dépasser 547 Ko
(Oui, c'est péremptoire, mais c'est mon choix comme dirait Evelyne T. )

On peut aussi ce que je fais parfois créer une macro qui créé le fichier exemple de A à Z.
Ainsi pas de souci de taille.
Il suffit de publier le code VBA dans le message et les explications d'utilisation
Comme celle-ci par exemple
VB: 
Sub creer_exemple()
Dim r As Range: Set r = [A1:F1]
r = "=""ITEM""&COLUMN()": r.Font.Bold = True: r.Interior.Color = RGB(197, 197, 197)
[A2:F20] = "=ADDRESS(ROW(),COLUMN(),4)"
[A1:F20] = [A1:F20].Value: [A1:F20].Borders.Value = 1
Application.ScreenUpdating = False
'une macro ne devrait pas faire cela ;-)
For i = 2 To 19
For j = 1 To 6
Cells(i, j).Interior.ColorIndex = Application.RandBetween(1, 56)
Next
Next
End Sub
 
Vote positif 0 Vote négatif
L

LEPATOCHE

XLDnaute Occasionnel
Bonsoir a tous

avec beaucoup de retard pour vous repondre car je devais chercher du travail et qui d'ailleur a porter c'est fruits merci pour votre reponse ! ca ne ma pas convenue mais pas grave j'ai su trouver
une solution moi meme et encore merci a vous tous et bon week end .
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

R
  • Question
XL 2016 Demande d'aide pour histogrammes
Réponses
2
Affichages
246
Rikko14
R
C
  • Résolu(e)
XL 2016 Répartir dans des Groupes d'Effectifs Aléatoires ... mais pas trop
Réponses
2
Affichages
279
crocrocro
C
V
  • Question
Autres Pseudo_Calendrier_8s
Réponses
0
Affichages
255
VIARD
V
V
  • Question
Autres Pseudo Calendrier
Réponses
0
Affichages
379
VIARD
V
  • Résolu(e)
XL 2021 ListBox1 : format texte date et enregistrement sans ma cellule
2
Réponses
15
Affichages
903
Usine à gaz
S
  • Question
XL 2021 macro VBA excel
Réponses
1
Affichages
432
crocrocro
C
B
  • Résolu(e)
Microsoft 365 Formule Excel : Colonne selon date du jour
Réponses
4
Affichages
675
djidji59430
S
  • Question
XL 2021 suite de nombre avec changement tous les 5
Réponses
9
Affichages
443
mapomme
  • Résolu(e)
Microsoft 365 formule qui ne devrait pas me renvoyer une plage
Réponses
6
Affichages
510
klin89
S
  • Question
Microsoft 365 créer un macro vba
Réponses
0
Affichages
352
souhaib ad
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…