XL 2019 Reporter des données d'apres une date de début et une date de fin

  • Initiateur de la discussion Initiateur de la discussion belindaw
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

belindaw

XLDnaute Nouveau
Bonjour,

Je souhaiterais reporter mes lignes de données de ma feuille 1 à ma feuille 2 seulement si la date de l'action est entre le 01/01/2021 et 31/12/2021.
Merci par avance,
 
Si le tableau source est grand le recalcul des formules matricielles peut prendre du temps.

On peut alors utiliser VBA avec le filtre avancé, le code dans Feuil2 :
VB:
Private Sub Worksheet_Activate()
Worksheet_Change [A1] 'lance la macro
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Application.EnableEvents = False 'désactive les évènements
[B1].Name = "An" 'cellule nommée
With [Tableau1].ListObject.Range 'tableau structuré
    Columns("D").Resize(, .Columns.Count).Clear 'RAZ
    .Cells(2, 26) = "=YEAR(A2)=An" 'critère
    .AdvancedFilter xlFilterCopy, .Cells(1, 26).Resize(2), [D1] 'filtre avancé
    .Cells(2, 26) = ""
End With
Rows(1).Font.Bold = True 'gras
Application.EnableEvents = True 'réactive les évènements
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
163
  • Question Question
Microsoft 365 Formule Outlook,
Réponses
8
Affichages
189
Retour