Find StartDate and EndDAte based upon Current year

[Derek]

I want to define criteria in a sql string like Date >= StartDate and Date<=EndDate.

The StartDate will always be 01/01/current year
The EndDate will always be 31/12/current year

How can I find StartDate and EndDate using vba?

Any help will be much appreciated.

Thanks

 

[gemma-the-husky]

startdate = dateserial(year(date),1,1,)

 

[Derek]

Thanks , it worked great.