Static date

H

Hernan

Hello,

I use =today()-1 in a cell to represent yesterday's date. However, how can
I make it static when saved?

TIA

Hernan
 
K

Kevin B

Instead of using the TODAY function, just type <CTRL> + ; to insert the
current system date as a static entry.

You can also insert the system time as a static entry with <Shift> + <CTRL>
+ ;

Hope this helps
 
S

Stephen Eccleston

Hi,

Which version of Excel will this work with?

in Excel 2003, <Ctrl>+ wants to insert cells.

Stephen
 
K

Kevin B

The <Ctrl> + is not a literal plus sign it means while holding down the
control key, press the semicolon key.

<Ctrl> + ;
 
G

Gord Dibben

None of the suggested CTRL + ; will give you yesterday's date.

Your formula will but as you note, wants to update every day.

You could use before_save event code to save the date as static but that would
wipe out the formula.

Maybe don't have a formula and have the event code insert yesterday's date when
the workbook is saved.

Private Sub Workbook_BeforeSave _
(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Sheet1").Range("A1").Value = Format(Date - 1, "dd/mm/yyyy")
End Sub


Gord Dibben MS Excel MVP
 
H

Hernan

Hi Gord,

Thank you for noticing that I needed the date for the day before current.

I think your solution is going to work. I need to get rid of the protection.
I will let you know about this.

Thanks again.

Hernan
 
G

Gord Dibben

What type of protection?

If sheet protection, add an unprotect line at top and a protect line at end.

Private Sub Workbook_BeforeSave _
(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Sheets("Sheet1")
.Unprotect Password:="justme"
.Range("A1").Value = Format(Date - 1, "dd/mm/yyyy")
.Protect Password:="justme"
End With
End Sub


Gord
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Shift - Alt - D shortcut 3
No update of dates 7
Static 5
Inserting date from formuls 2
if/then insert date but don't want automatic updates 7
static date and time 2
Weekly count. 5
Add Date 2

Top