Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can I do date "calculations"?
To be more specific, if a user gives me a date in the format of 4/24/06, I am
supposed to return a list of the next "X" amount of weeks, starting with Monday. For example, I would return 5/1/06, 5/8/06, if they wanted two weeks, or I would return 5/1/06, 5/8/06, 5/15/06, 5/22/06, 5/29/06, 6/5/06, if they wanted 6 weeks. I am always using the day Monday as reference. Can these dates be calculated in a way? Any code would be very helpful. Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can I do date "calculations"?
If your date is in A1, use a formula like
=A1+(7*NumberOfWeeks) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "monica" wrote in message ... To be more specific, if a user gives me a date in the format of 4/24/06, I am supposed to return a list of the next "X" amount of weeks, starting with Monday. For example, I would return 5/1/06, 5/8/06, if they wanted two weeks, or I would return 5/1/06, 5/8/06, 5/15/06, 5/22/06, 5/29/06, 6/5/06, if they wanted 6 weeks. I am always using the day Monday as reference. Can these dates be calculated in a way? Any code would be very helpful. Thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can I do date "calculations"?
assuming they will always give you a monday
Sub Hereisasample() Dim dt as Date, n as Long, i as Long, s as String dt = cdate(inputbox("Enter a monday date")) n = 6 for i = 1 to n s = s & format((dt + 7 * i),"mm/dd/yyyy") & vbNewline next msgbox s End Sub -- Regards, Tom Ogilvy "monica" wrote: To be more specific, if a user gives me a date in the format of 4/24/06, I am supposed to return a list of the next "X" amount of weeks, starting with Monday. For example, I would return 5/1/06, 5/8/06, if they wanted two weeks, or I would return 5/1/06, 5/8/06, 5/15/06, 5/22/06, 5/29/06, 6/5/06, if they wanted 6 weeks. I am always using the day Monday as reference. Can these dates be calculated in a way? Any code would be very helpful. Thanks |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can I do date "calculations"?
Thanks to both of you!
"Tom Ogilvy" wrote: assuming they will always give you a monday Sub Hereisasample() Dim dt as Date, n as Long, i as Long, s as String dt = cdate(inputbox("Enter a monday date")) n = 6 for i = 1 to n s = s & format((dt + 7 * i),"mm/dd/yyyy") & vbNewline next msgbox s End Sub -- Regards, Tom Ogilvy "monica" wrote: To be more specific, if a user gives me a date in the format of 4/24/06, I am supposed to return a list of the next "X" amount of weeks, starting with Monday. For example, I would return 5/1/06, 5/8/06, if they wanted two weeks, or I would return 5/1/06, 5/8/06, 5/15/06, 5/22/06, 5/29/06, 6/5/06, if they wanted 6 weeks. I am always using the day Monday as reference. Can these dates be calculated in a way? Any code would be very helpful. Thanks |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can I do date "calculations"?
Perhaps another option, but with no checking if the start date is a Monday.
Sub Demo() '// Your info he Const NumberOfWeeks As Long = 7 Range("A1") = "4/24/2006" '// Then... Range("A1").Resize(NumberOfWeeks).DataSeries Date:=xlDay, Step:=7 End Sub -- HTH. :) Dana DeLouis Windows XP, Office 2003 "monica" wrote in message ... To be more specific, if a user gives me a date in the format of 4/24/06, I am supposed to return a list of the next "X" amount of weeks, starting with Monday. For example, I would return 5/1/06, 5/8/06, if they wanted two weeks, or I would return 5/1/06, 5/8/06, 5/15/06, 5/22/06, 5/29/06, 6/5/06, if they wanted 6 weeks. I am always using the day Monday as reference. Can these dates be calculated in a way? Any code would be very helpful. Thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
creating a "date selector box" or "pull down box" in a cell | Excel Worksheet Functions | |||
Convert numbers to date: "586" to read "May 1986" | Excel Worksheet Functions | |||
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell | Excel Discussion (Misc queries) | |||
change "true" and "false" to "availble" and "out of stock" | Excel Worksheet Functions | |||
Count occurences of "1"/"0" (or"TRUE"/"FALSE") in a row w. conditions in the next | New Users to Excel |