How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.

=TODAY() or =NOW()

Note that these formulas update every time a workbook is opened/saved.

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"Ammo2004" wrote:

How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.

Let's say you want cell A1 to contain the date whenever any cell on that
sheet is changed. In worksheet code put the following macro:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("A1").Value = Format(Now(), "dd mmm yyyy")
Application.EnableEvents = True
End Sub
--
Gary's Student
gsnu200704


"Ammo2004" wrote:

How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.

Does this have any advantage over just entering =NOW() in A1?

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"Gary''s Student" wrote:

Let's say you want cell A1 to contain the date whenever any cell on that
sheet is changed. In worksheet code put the following macro:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("A1").Value = Format(Now(), "dd mmm yyyy")
Application.EnableEvents = True
End Sub
--
Gary's Student
gsnu200704


"Ammo2004" wrote:

How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.

The poster want the date entered only when the sheet has been updated.
Putting a formula in the cell will cause it to change everyday, whether other
cells have been updated or not.
--
Gary's Student
gsnu200704


"Dave F" wrote:

Does this have any advantage over just entering =NOW() in A1?

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"Gary''s Student" wrote:

Let's say you want cell A1 to contain the date whenever any cell on that
sheet is changed. In worksheet code put the following macro:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("A1").Value = Format(Now(), "dd mmm yyyy")
Application.EnableEvents = True
End Sub
--
Gary's Student
gsnu200704


"Ammo2004" wrote:

How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.

Thanks for the explanation.

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"Gary''s Student" wrote:

The poster want the date entered only when the sheet has been updated.
Putting a formula in the cell will cause it to change everyday, whether other
cells have been updated or not.
--
Gary's Student
gsnu200704


"Dave F" wrote:

Does this have any advantage over just entering =NOW() in A1?

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"Gary''s Student" wrote:

Let's say you want cell A1 to contain the date whenever any cell on that
sheet is changed. In worksheet code put the following macro:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("A1").Value = Format(Now(), "dd mmm yyyy")
Application.EnableEvents = True
End Sub
--
Gary's Student
gsnu200704


"Ammo2004" wrote:

How do you formulate a cell to automatically insert the current date? (Not
in Header/Footer but in a cell of the actual body of the worksheet)

I want my form to automatically insert the current date each time I update it.