Bonjour à tous,
Je cherche à faire une macro qui pourra me supprimer les lignes d'un tableau si la date d'une cellule change.
J'ai réalisé une interface de saisie pour laquelle je souhaite pouvoir imprimer quotidiennement les relevés. Ils sont sauvegardés sur une autre feuille. Et la feuille que je veux imprimer ne doit contenir que les données du jour.
J'ai donc testé de récupérer la date du jour avec la formule Aujourdhui() dans une case hors du tableau. Et associé une macro pour qu'au changement de date, la feuille se supprime dont le code est le suivant :
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$R$2" Then
Sheets("Données_casse").Select
Range("A4:M40").Select
Selection.EntireRow.Delete
ActiveWorkbook.Save
Application.DisplayAlerts = False
End If
End Sub
En soit le code fonctionne. Sauf que dans le cas présent, lorsque la date change d'un jour à l'autre automatiquement dans ma case R2 rien ne se passe...
Auriez vous une idée de comment procéder pour réaliser ce que je souhaite ?
Merci d'avance!