Donc ta liste déroulante fait référence à une plage où se situe cette formule FILTRE ?
Si oui, je te propose un truc mais n'étant pas doué en VBA, je pense qu'il y a sûrement mieux ;
- si ta formule FILTRE est par exemple en B6 et ta liste déroulante en D6, tu mets par exemple en F6 ceci ;
=NB.SI(B6:B72;"<>")
Et en VBA (sur la même feuille) ;
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("F6") = "1" Then
Range("D6").Value = Range("B6").Value
End If
End Sub
J'ai d'abord essayé avec WorksheetFunction.CountA dans le code mais n'ai pas réussi à le faire fonctionner (permettrait de se passer de la cellule F6 pour compter les cellules non vides).