Date Variable

's Computer Specifications

Hi

I have one problem with the below code, it showing me the march 9th date,
how will i change it to 1st of every month, so that next month when i run
this it should show me 1st of April.

curmt = Format(Date, "mmm-yy")
curmth = CDbl(CDate(curmt))
MsgBox curmth

Answer is 39881, the required answer is 39873

's Computer Specifications

Hi, use this code instead:

curmt = Format(Date, "mmm-yyyy")
curmth = CDbl(CDate(curmt))
MsgBox curmth

"Ranjith Kurian" wrote:

> Hi
>
> I have one problem with the below code, it showing me the march 9th date,
> how will i change it to 1st of every month, so that next month when i run
> this it should show me 1st of April.
>
> curmt = Format(Date, "mmm-yy")
> curmth = CDbl(CDate(curmt))
> MsgBox curmth
>
> Answer is 39881, the required answer is 39873
>
>

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Open file with variable date name based on current date	Ciprian	Microsoft Excel Programming	1	7th Jan 2010 02:31 PM
assigning a null value of a date field to a date variable	George	Microsoft Access Form Coding	4	3rd May 2008 11:50 AM
calc constant date from variable date & return with ability to rn.	=?Utf-8?B?U3VzaWVRJ3NRdWVzdA==?=	Microsoft Excel Worksheet Functions	1	9th Nov 2004 08:51 PM
Compare Date in Cell VS a Variable Date to Hide Row	=?Utf-8?B?SmltSQ==?=	Microsoft Excel Programming	3	10th Oct 2004 04:26 PM
Is there a function to get only the date from a full date and time variable	Fred Palmer	Microsoft Access Queries	2	16th Sep 2003 02:39 PM