Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Date Creation in Cell
Hi
I am trying to write a formula that will enter the date in field A2 if there is text in B2 but the date must be the date when B2 was typed into and not todays date.any help will be appreciated. Thanks Dayne |
#2
|
|||
|
|||
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ws_exit: Application.EnableEvents = False If Target.Address = "$B$2" Then Range("A2").Value = Format(Date, "dd mmm yyyy") End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- HTH Bob Phillips "Dayne Dillon" <Dayne wrote in message ... Hi I am trying to write a formula that will enter the date in field A2 if there is text in B2 but the date must be the date when B2 was typed into and not todays date.any help will be appreciated. Thanks Dayne |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Date Creation in Cell
Sorry to jump on your thread Dayne but I have an additional question in this
theme. Bob, you code is just what I am looking for, but is it possible to make it repeat itself down the sheet? i.e. enter the date in A3 down to A500 if there is text in B3 to B500? I am new to VBA and trying to learn from reading as much of this forum as possible! Many thanks in anticipation of a simple answer :) Leigh "Bob Phillips" wrote: Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ws_exit: Application.EnableEvents = False If Target.Address = "$B$2" Then Range("A2").Value = Format(Date, "dd mmm yyyy") End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- HTH Bob Phillips "Dayne Dillon" <Dayne wrote in message ... Hi I am trying to write a formula that will enter the date in field A2 if there is text in B2 but the date must be the date when B2 was typed into and not todays date.any help will be appreciated. Thanks Dayne |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to insert date using a pop up calendar control in a cell i | Excel Discussion (Misc queries) | |||
Making a auto date entered into a cell permanent from a template | Excel Discussion (Misc queries) | |||
Return a date 6 months from a date in another cell | Excel Worksheet Functions | |||
Combined date time cell to separate date & time components | Excel Worksheet Functions | |||
cell assumes wrong date | Setting up and Configuration of Excel |