The Month function converts a serial number to a month. Use the following if you want to use the month function: MONTH(DATEVALUE("07/25/1985")). The DateValue function converts the date to a serial number.
--- In ExcelVBA@yahoogroups.com, Nishu Kumar <contactmanish_panwar@...> wrote:
>
> Hello group,
>
> Please assist me to get the current month. the problem is month "12" is coming at all the time whenever i give reference of sheet 1. for example:
>
> here is my coding:
>
> Sub Mymonth()
> Dim Mon As Integer
> Mon = Month(A3) 'the value in A3 is 25/07/1985 and even changed to 07/25/1985
> Cells(5, 1).Value = Mon
> End Sub
>
> the answer of above query is 12 which is not correct
>
>
> Please assist me as where i am going astray.
>
> Regards,
> Nishu
>
> [Non-text portions of this message have been removed]
>
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
Tidak ada komentar:
Posting Komentar