XL pour MAC Extraction de données entre 2 dates

[Nono1835]

Bonjour à tous
je souhaite effectuer une extraction de données d'après un tableau, cette extraction je souhaite la faire avec un critère de date de début et de fin de periode.
j'ai essayé en suivant des tuto mais à chaque fois il s'agit de la fonction filtre que je n'ai pas dans ma version d'excel
merci de votre aide
cordialement

 

[djidji59430]

Bonjour à tous,

Une proposition :

 

[JHA]

Bonjour à tous,

A essayer cette formule matricielle en "G9"

=SIERREUR(INDEX(B$5:B$30;PETITE.VALEUR(SI(($D$5:$D$30>=$G$6)*($D$5:$D$30<=$H$6);LIGNE($D$5:$D$30)-4);LIGNES($1:1)));"")

copier vers la droite et le bas

JHA

 

[Nono1835]

Bonjour à tous,

Une proposition :

Merci
excellent
je vais pouvoir l’améliorer (calendrier pour choisir la date etc ....)

 

[Nono1835]

Bonjour à tous,

A essayer cette formule matricielle en "G9"

=SIERREUR(INDEX(B$5:B$30;PETITE.VALEUR(SI(($D$5:$D$30>=$G$6)*($D$5:$D$30<=$H$6);LIGNE($D$5:$D$30)-4);LIGNES($1:1)));"")

copier vers la droite et le bas

JHA

Merci beaucoup en plus avec l'extraction sur une autre feuille top

 

[job75]

Bonjour Nono1835, djidji59430, JHA,

L'inconvénient des formules matricielles c'est qu'elles prennent beaucoup de temps.

Pour tester j'ai recopié le tableau B5:E30 sur 26 000 lignes.

Le recalcul des résultats en G9:J7008 se fait en 60 secondes, c'est rédhibitoire.

Pour aller vite il faut utilise Power Query ou VBA.

A+

 

[Nono1835]

re
est il possible de m'aider a insérer un calendrier dans les cellules date
je ne trouve pas l'insertion car il me manque des le bouton insérer dans développeur .
je pense que j'ai un soucis avec ma version excel .........
si quelqu'un a par la meme occasion la possibilite de me conseiller une version excel ...
merci de vos retours

 

[Phil69970]

Bonjour à tous

@Nono1835

Je te propose ce fichier

Merci de ton retour

 

[JHA]

Bonjour à tous,

Un début de piste avec Power query

JHA

 

[Nono1835]

Bonjour à tous

@Nono1835

Je te propose ce fichier

Merci de ton retour

excellent
merci beaucoup

 

[Nono1835]

Bonjour à tous,

Un début de piste avec Power query

JHA

top je ne connaissais pas
merci

 

[job75]

Une solution VBA très rapide est d'utiliser un tableau VBA, la macro dans le code de la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim deb, fin, tablo, ub%, dat, i&, n&, j%
deb = [G6]: fin = [H6]
tablo = [Tableau1] 'matrice, plus rapide
ub = UBound(tablo, 2)
For i = 1 To UBound(tablo)
    dat = tablo(i, 3)
    If dat >= deb And dat <= fin Then
        n = n + 1
        For j = 1 To ub
            tablo(n, j) = tablo(i, j)
        Next j
    End If
Next i
'---restitution---
Application.EnableEvents = False
With [Tableau2]
    If n Then .Resize(n) = tablo
    If n < .Rows.Count Then .Rows(n + 1).Resize(.Rows.Count - n).Delete xlUp
End With
Application.EnableEvents = True
End Sub

Elle se déclenche quand on modifie ou valide une cellule quelconque.

Testée avec Tableau1 recopié sur 26 000 lignes elle s'exécute chez moi en 0,09 seconde.

Notez que Tableau2 peut être dans une autre feuille, le code ne change pas.

Bonne nuit.

 

[Nono1835]

Une solution VBA très rapide est d'utiliser un tableau VBA, la macro dans le code de la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim deb, fin, tablo, ub%, dat, i&, n&, j%
deb = [G6]: fin = [H6]
tablo = [Tableau1] 'matrice, plus rapide
ub = UBound(tablo, 2)
For i = 1 To UBound(tablo)
    dat = tablo(i, 3)
    If dat >= deb And dat <= fin Then
        n = n + 1
        For j = 1 To ub
            tablo(n, j) = tablo(i, j)
        Next j
    End If
Next i
'---restitution---
Application.EnableEvents = False
With [Tableau2]
    If n Then .Resize(n) = tablo
    If n < .Rows.Count Then .Rows(n + 1).Resize(.Rows.Count - n).Delete xlUp
End With
Application.EnableEvents = True
End Sub

Elle se déclenche quand on modifie ou valide une cellule quelconque.

Testée avec Tableau1 recopié sur 26 000 lignes elle s'exécute chez moi en 0,09 seconde.

Notez que Tableau2 peut être dans une autre feuille, le code ne change pas.

Bonne nuit.

bonjour
merci pour l'astuce
je viens de me rendre compte que lorsque j’améliore mon tableau ( ajout de colonne la programmation bug )
du coup il faut que je me penche sur le langage VBA pour faire des modifications
cordialement

 

[scraper]

Bonjour Nono1835,
Si la date change de colonne, l'instruction
dat = tablo(i,3) doit changer (3 est l'index de la colonne date soit C)

 

[Dand87]

Bonjour à tous
je souhaite effectuer une extraction de données d'après un tableau, cette extraction je souhaite la faire avec un critère de date de début et de fin de periode.
j'ai essayé en suivant des tuto mais à chaque fois il s'agit de la fonction filtre que je n'ai pas dans ma version d'excel
merci de votre aide
cordialement

Voici une solution toute simple avec l'instruction "Filtre"