Bonjour à tous !
Après avoir éclusé le forum, je ne m'en sors toujours pas - et étant débutant et autodidacte, je sens bien qu'il me manque une info et j'aurais bien besoin de vos lumières d'experts.
Voici mon problème.

J'ai un tableau à cinq colonnes : Nom - Date - Montant - Référence - Dispatch

Dans ce tableau, les données sont classées par date puis, pour chaque date, par référence. Le nombre de lignes par date n'est pas fixe.
Je voudrais une macro qui lance une inputbox dans laquelle on rentrerait une date, puis qui sélectionnerait toutes les lignes correspondant à la date saisie et les copierait dans un feuillet à part.
Pour l'instant j'ai une macro, mais qui ne sélectionne / copie-colle que la dernière ligne à la date voulue, or j'aurais besoin qu'elle les sélectionne toutes...

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim i As Integer
Dim nb_lig As Integer
Dim ds As Date
nb_lig = Range("A" & Rows.Count).End(xlUp).Row
ds = InputBox("Date souhaitée")
 
For i = 2 To nb_lig
    Set zone = Range("A" & i & ":E" & i)
    If Cells(i, 2) = ds Then Range("A" & i & ":E" & i).Copy
 
Next
Sheets.Add After:=ActiveSheet
ActiveSheet.Paste
 
End Sub
Comment pourrais-je faire ?
Merci à tous