| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Add days to a date
With three textboxes(1,2 and 3) in a userform1.
If I insert a date in textbox1, how do I get textbox2 to show the date (textbox1)+90 days and textbox3 to show the date (textbox1)+120 days? Using vb code? -- kk |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Add days to a date
Option Explicit
Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If IsDate(Me.TextBox1.Value) Then Me.TextBox2.Value _ = Format(CDate(Me.TextBox1.Value) + 90, "mmmm dd, yyyy") Me.TextBox3.Value _ = Format(CDate(Me.TextBox1.Value) + 120, "mmmm dd, yyyy") Else Beep Cancel = True End If End Sub kk wrote: With three textboxes(1,2 and 3) in a userform1. If I insert a date in textbox1, how do I get textbox2 to show the date (textbox1)+90 days and textbox3 to show the date (textbox1)+120 days? Using vb code? -- kk -- Dave Peterson |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Add days to a date
Excellent, brilliant.
Thank you Dave -- kk "Dave Peterson" wrote: Option Explicit Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If IsDate(Me.TextBox1.Value) Then Me.TextBox2.Value _ = Format(CDate(Me.TextBox1.Value) + 90, "mmmm dd, yyyy") Me.TextBox3.Value _ = Format(CDate(Me.TextBox1.Value) + 120, "mmmm dd, yyyy") Else Beep Cancel = True End If End Sub kk wrote: With three textboxes(1,2 and 3) in a userform1. If I insert a date in textbox1, how do I get textbox2 to show the date (textbox1)+90 days and textbox3 to show the date (textbox1)+120 days? Using vb code? -- kk -- Dave Peterson |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Conditional Formatting Dates calculating 10 days and 30 days from a certain date | Excel Worksheet Functions | |||
| Report Date - Date Recv = Days Late, but how to rid completed date | Excel Worksheet Functions | |||
| Excel Formula to calulate number of days passed from date to date | Excel Discussion (Misc queries) | |||
| formula to calculate future date from date in cell plus days | Excel Worksheet Functions | |||
| Calculating days between current date and a date in future NETWORKDAYS() function | Excel Worksheet Functions | |||
Hybrid Mode
