Hope this is not a duplicate thread by me as got problem to upload my
question earlier.

Faced with this for a while. I have the following data:

A B C D E F G
H
1 Date Price Date Price Date Price
2 3-Jan-05 1.2590 Jan-03 0.8480 Jan-03 0.8480
3 4-Jan-05 1.2590 Feb-03 0.8330 Feb-03 0.8330
4 5-Jan-05 1.2590 Mar-03 0.8200 Mar-03 0.8200
5 6-Jan-05 1.2590 Apr-03 0.8330 Apr-03 0.8330
6 7-Jan-05 1.2590 May-03 0.8810 May-03 0.8810
7 10-Jan-05 1.2590 Jun-03 0.9650 Jun-03 0.9650
8 11-Jan-05 1.2260 Jul-03 1.0430 Jul-03 1.0430

Column A and B are growing everyday, except weekends. D is derived from A by
=EOMONTH(D85,1) and E =LOOKUP(D86,Sheet2!$A:$A,Sheet2!$B:$B)

I created 2 command buttons (Daily, Monthly) to get date in G. Here is the
problem: how do I get the price in H? I have tried using the same method I am
using to get G but as the macros is written to extract unique values, it
works for date but not price.

'---Start of Code-------
Option Explicit

Sub PullUniqueData()
Range("Sheet2!Database").AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=Range("Sheet2!Extract"), _
Unique:=True
End Sub
'---Start of Code-------

As the final data is use to create a chart, I would prefer not to use
formulas and drag in H, otherwise for monthly chart it will have a long list
of empty values