VBA - Macro à 2 conditions if

Bonjour,

Je me présente tout d'abord : Alex, je dois apprendre à manier les macros pour automatiser certaines tâches sur Excel.

Je voudrais pouvoir automatiser l'action de masquer les lignes dont une cellule déterminée n'est pas comprise entre un minimum et un maximum, qui sont des valeurs de cellules.

Valeur minimum en D1
Valeur maximum en D2

Cellules dont je veux pouvoir masquer les lignes si leur valeur n'est pas comprise entre le minimum et le maximum : (A3:A9)

Mon code:

Sub masquer_ligne_Vide_Prix()

Dim cel As Range

For Each cel In Range("A3:A9")
If Range("D1").Value > cel And cel > Range("D2").Value Then
cel.EntireRow.Hidden = True
'Prix



End If
Next
End Sub

J'ai créé un bouton affecté à cette macro mais ça ne marche pas!


Merci d'avance pour votre aide!