Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to convert date to text
Excel 2003 VB - I need to add code to a macro that compares today's date to
the last time this macro was run, and provides the number of days different between the two dates. Can anyone help? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to convert date to text
Add the following code at the beginning of your existing code. It will create an hidden defined name called "LastRun" containing the date on which the code was executed. Dim D As Date Dim S As String Dim Nm As Name On Error Resume Next Set Nm = ThisWorkbook.Names("LastRun") If Err.Number < 0 Then ThisWorkbook.Names.Add "LastRun", Int(Now), False Else S = Nm.RefersTo S = Mid(S, 2) D = CDate(S) Debug.Print "Last Run: " & D, "Days between: " & Int(Now) - D End If ThisWorkbook.Names.Add "LastRun", Int(Now), False Cordially, Chip Pearson Microsoft Most Valuable Professional Excel Product Group, 1998 - 2009 Pearson Software Consulting, LLC www.cpearson.com (email on web site) On Tue, 17 Feb 2009 14:21:01 -0800, Mr. Clean wrote: Excel 2003 VB - I need to add code to a macro that compares today's date to the last time this macro was run, and provides the number of days different between the two dates. Can anyone help? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to convert date to text
If it were me, I'd add a named range that contains the last time the macro
was run. Each time the macro is run, I'd pull that value and do the calculation. After the calculation is done, I'd reset the named range. If you need more info on this, come back and let us know. -- HTH, Barb Reinhardt If this post was helpful to you, please click YES below. "Mr. Clean" wrote: Excel 2003 VB - I need to add code to a macro that compares today's date to the last time this macro was run, and provides the number of days different between the two dates. Can anyone help? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to convert date to text
Thanks for the VERY swift reply. This was my first post.
I need one more thing. I need to write a text message into a cell that tells the user that the last time this macro was run was more than 90 days ago. "Mr. Clean" wrote: Excel 2003 VB - I need to add code to a macro that compares today's date to the last time this macro was run, and provides the number of days different between the two dates. Can anyone help? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do i convert text to date (mm/yy text to mm/dd/yyyy date)? | Excel Discussion (Misc queries) | |||
VBA convert day and date from text string to Excel date | Excel Programming | |||
Excel, how do I write a macro to convert the date value to text? | Excel Programming | |||
Help: How do I convert a text date into a real date format | Excel Worksheet Functions | |||
Macro to convert text to date | Excel Worksheet Functions |