Hi Vikash,

I'm sure this can be tidied up, but, one way, is with
your data in A1:A6000.

In B10 put =AVERAGE(A1:A10)
Then highlight B1 to B10
Grab the fill handle and drag to the end of your data
Then use autofilter to compact column B and then copy it
to somewhere usable.

HTH
Martin