الرجاء التعديل على هدا الكود

[ريان أحمد]

If Range("h2").Value = "" Then
 ActiveSheet.Range("$A$3:$v$50000").AutoFilter Field:=8
Else
 ActiveSheet.Range("$A$3:$v$50000").AutoFilter Field:=8, Criteria1:=Range("h2")
End If

 

 

 

لكي ينجح مع التاريخ

[ريان أحمد]

up