如何找到該月的第一次約會在VBA

Question

一組數據，我有一組數據這樣：

05/06/2015 
04/06/2015 
03/06/2015 
02/06/2015 
29/05/2015 
28/05/2015 
27/05/2015 
26/05/2015 
25/05/2015 
22/05/2015 
21/05/2015 
20/05/2015 
19/05/2015 
18/05/2015 
15/05/2015 
14/05/2015 
13/05/2015 
12/05/2015 
11/05/2015 
08/05/2015 
07/05/2015 
06/05/2015 
05/05/2015 
04/05/2015 
30/04/2015 
29/04/2015 
28/04/2015 
27/04/2015 
24/04/2015 
23/04/2015 
22/04/2015 
21/04/2015 
20/04/2015 
17/04/2015 
16/04/2015 
15/04/2015 
14/04/2015 
13/04/2015 
10/04/2015 
09/04/2015 
08/04/2015 
07/04/2015 
06/04/2015 
02/04/2015 
01/04/2015 
31/03/2015 

這些涉及到平日一年。在這些日期中，我想查找本月的第一個日期。例如，6月份，第一個確定的日期應該是2015年6月2日，5月4日是2015年5月4日。

我已經試過這樣的事情：

=IF(Cellreference=((Cellreference)-DAY(Cellreference)+1),TEXT(Cellreference,"mmm"),"") 

但這隻需要一個月的第一天。我希望它成爲本月在給定日期列表中的第一個日期。

需要一些關於如何實現這一點的指導。

Answer 1

我看你用式所以我只能建議如下：

=MIN(IF(MONTH(AllDateReference)=MONTH(CellReference),AllDateReference,1E+99)) 

這是使用按Ctrl + Shift + Enter鍵數組公式輸入。
實際樣品：

=MIN(IF(MONTH(A$1:A$46)=MONTH(A1),A$1:A$46,1E+99)) 

其中A$1:A$46包含所有日期。

編輯1：僅在本月的第一天顯示。

=IF(A1=MIN(IF(MONTH(A$1:A$46)=MONTH(A1),A$1:A$46,1E+99)),A1,"") 

樣品：