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

Macro Recherche dates

  • Initiateur de la discussion Initiateur de la discussion Inguyone
  • 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 !

I

Inguyone

Guest
Bonjour,

Je suis à la recherche d’une macro qui prendrait en charge la date du jour et la comparerait avec des dates dans une base de données. J’ai créé une formule pour contrôler ces dates et me les renvoyés avec un chiffre =SI(XX<XX ;2 ;1) et ensuite une macro
Sub suppr()
Dim I As Long
Dim Plage As Range
Set Plage = Range("m4:m" & Range("m4").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
If Plage.Cells(I).Value > 1 Then
Plage.Cells(I).EntireRow.Delete
End If
Next

End Sub

Cela fonctionne, mais pourriez-vous m’aider pour que cette macro recherche directement dans la colonne « g »des dates et non dans celle de ma formule « m ».

En vous remerciant d’avance pour votre aide.
 
Re : Macro Recherche dates

Bonjour Inguyone 🙂,
Quelque chose comme ça peut-être 😛...
Code:
Sub suppr()
Dim Plage As Range, Cellule As Range, ASupprimer As Range
Set Plage = Range("G4:G" & Range("G4").End(xlDown).Row)
For Each Cellule In Plage
    If Cellule < Now() Then
        If ASupprimer Is Nothing Then
            Set ASupprimer = Cellule.EntireRow
        Else
            Set ASupprimer = Union(ASupprimer, Cellule.EntireRow)
        End If
    End If
Next
ASupprimer.Delete
End Sub
Bon dimanche 😎
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
8
Affichages
782
Réponses
7
Affichages
454
Réponses
5
Affichages
912
Réponses
15
Affichages
786
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…