Find min in filtered range in VBA

[QuestionBaker]

I wish to prepare Gannt chart from a sheet where bunch of projects are listed.
I am unable to find oldest date after filtering the relevant project.

I've tried min (K3 to N1770) (data is there till row 1770) but it gives an answer as Sep 2016, so I know I am making a mistake.

How do I find min and max in a filtered range

my data looks as follows

 

[QuestionBaker]

I'll try it out tomorrow and Mark all the answers that gave a correct answer

 

[Fluff]

You will only be able to mark one post as the solution.
So if you let us know how it goes & if any of the posts meats your needs mark that as the solution.

 

[QuestionBaker]

Maybe...

=AGGREGATE(15,5,K3:N1770,1)

M.

This also works

MsgBox (CDate(Evaluate("=AGGREGATE(15,5,K3:N1770,1)"))

 

[QuestionBaker]

Or

Sub xTest()
    Dim lMinDate As Long
   
    lMinDate = Application.Aggregate(15, 5, Range("K3:N1770"), 1)
    MsgBox lMinDate
End Sub

M.

This also works.