XL 2019 RechercheV + DECALER

djidji59430

XLDnaute Barbatruc

• 17 Novembre 2023

• #2

Bonjour à tous,

Une proposition :

 

Pièces jointes

• RECHERCHEV DECALER.xlsx

  14.3 KB · Affichages: 7

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 17 Novembre 2023

• #3

Bonjour Lazz, djidji59430,

En C3 de la 2ème feuille, à tirer à droite et vers le bas :

Code:

=SIERREUR(SOMME(DECALER(Feuil1!$B$1;EQUIV($A3;Feuil1!$A:$A;0)-1;;;COLONNES($C:C)));"")

A+

 

Pièces jointes

• RECHERCHEV DECALER.xlsx

  12.5 KB · Affichages: 3

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 17 Novembre 2023

• #4

Par curiosité j'ai déterminé les durées du recalcul des 120 formules :

- post #2 avec SOMMEPROD => 1 milliseconde

- post #3 avec DECALER et EQUIV => 20 millisecondes.

Je ne m'attendais pas à une telle différence.

 

Vote positif 0 Vote négatif

djidji59430

XLDnaute Barbatruc

• 17 Novembre 2023

• #5

et par curiosté, ça se calcule comment ? et avec quoi ?

Crdlmt

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 17 Novembre 2023

• #6

djidji59430 à dit:

et par curiosté, ça se calcule comment ? et avec quoi ?

Cliquez pour agrandir...

Il faut que les formules soient volatiles.

DECALER est une fonction volatile, donc OK, pour tes formules j'ai ajouté ENT(ALEA())

Ensuite j'exécute la macro :

VB:

Sub a()
t = Timer
For i = 1 To 1000
Calculate
Next
MsgBox Timer - t
End Sub

 

Vote positif 0 Vote négatif

L

Lazz

XLDnaute Junior

• 20 Novembre 2023

• #7

job75 à dit:

Bonjour Lazz, djidji59430,

En C3 de la 2ème feuille, à tirer à droite et vers le bas :

Code:

=SIERREUR(SOMME(DECALER(Feuil1!$B$1;EQUIV($A3;Feuil1!$A:$A;0)-1;;;COLONNES($C:C)));"")

A+

Cliquez pour agrandir...

Bonjour @job75, @djidji59430

Merci pour vos formule !
Malheureusement ça ne marche pas avec une variable...
Enfaite je veux seulement un seul mois (exemple janvier) et ça me calcule la somme de novembre à janvier.
En changeant le mois en C2, ça change la variable et ça calcule automatiquement.

Savez-vous si c'est possible ?
Merci beaucoup !

 

Pièces jointes

• RECHERCHEV DECALER.xlsx

  12.7 KB · Affichages: 3

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 20 Novembre 2023

• #8

Bonjour Lazz, le forum,

Code:

=SIERREUR(SOMME(DECALER(Feuil1!$B$1;EQUIV($A3;Feuil1!$A:$A;0)-1;;;EQUIV(C$2;Feuil1!$2:$2;0)-1));"")

A+

 

Pièces jointes

• RECHERCHEV DECALER.xlsx

  12.6 KB · Affichages: 2

Vote positif 0 Vote négatif

Solution