Dear Rashid,
Please try..
Option Explicit
Public Function ReverseDate(Rng As Excel.Range)
If VBA.Len(Rng) = 8 And IsNumeric(Rng) = True Then
ReverseDate = VBA.Right(Rng, 4) & VBA.Mid(Rng, 3, 2) & VBA.Left(Rng, 2)
Else
ReverseDate = vbNullString
End If
End Function
On Sun, Aug 26, 2012 at 1
> Microsoft Excel Developer
> SalesAid Software
> dguil...@gmail.com
>
> *From:* prkhan56
> *Sent:* Sunday, August 26, 2012 3:19 AM
> *To:* excel-...@googlegroups.com
> *Subject:* $$Excel-Macros$$ Re: Macro to convert date at the time of entry
>
> Hello,
&g
Macro to convert date at the time of entry
Hello,
Don Sir I have mailed you the file on your gmail ID.
Van, your solution is ok if the entry is done as a date
We just type 8 digits like 08092012 and want to change it to 20120908
Your solution will work for a date which is already there and I was lo
Microsoft Excel Developer
SalesAid Software
dguille...@gmail.com
From: prkhan56
Sent: Sunday, August 26, 2012 3:19 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Re: Macro to convert date at the time of entry
Hello,
Don Sir I have mailed you the file on your gmail ID.
Van, your
Hello,
Don Sir I have mailed you the file on your gmail ID.
Van, your solution is ok if the entry is done as a date
We just type 8 digits like 08092012 and want to change it to 20120908
Your solution will work for a date which is already there and I was looking
to change the entry as soon as it
