Stop a date from updating each successive day

[eyecare]

This is the function I am using,

IF(C1=0, "", TODAY())

This works, however as you can see the resulting date will change. I would like the date to be fixed and not change.

Would appreciate your help

............... Thanks, Gene Gould OD

 

[Andrew Poulsom]

See:

http://216.92.17.166/board/viewtopic.php?topic=18557&forum=2

 

[klb]

Seems like an awfully complex way to do something that you could just type in the cell using maybe 8 keystrokes.

 

[MT_Shanachie]

Maybe I'm missing something, but couldn't you just use:

=IF(C1=0, "", DATEVALUE("10/17/02"))

 

[shades]

I developed a macro for many of our people, then assigned it to a button. This one inputs Today() in cell G1, then copies, and Paste Special.

Sub CopyToday
Range("G1").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
Range("G1").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Paste
Application.CutCopyMode = False
Range("A1").Select
End Sub

 

[Andrew Poulsom]

That could done with one line of code:

Sub CopyToday()
    Range("G1").Value = Format(Date, "Short Date")
End Sub

 

[B_2]

On 2002-10-17 14:41, Andrew Poulsom wrote:
That could done with one line of code:

Sub CopyToday()
    Range("G1").Value = Format(Date, "Short Date")
End Sub

nice bit of code andrew, a question for you.

Is this possible if you enter a value, e.g 2 in column "G2" the date going back 2 days and so on?



Regards

 

[Andrew Poulsom]

Like this?

Range("G1").Value = Format(Date - Range("G2").Value, "Short Date")

 

[B_2]

sweet..thx dude

 

[B_2]

On 2002-10-18 03:21, B_2 wrote:
sweet..thx dude

Andy works fine if you enter 1,2,3,4,5, but when you enter 10 it backfires! any clues?