Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
KJ KJ is offline
external usenet poster
 
Posts: 43
Default Keep todays date, tomorrow

On a quoting file I use, I use today's date as =today()
Just one less field I have to enter. Is there a formula I'm missing that
would save the date I created or saved the file?
ei: I open my generic/blank file today on 1/8, save it as a quote number. I
want the quote to say 1/8 'til the end of time. Is there a formula that will
pull the saved date instead of "today()"?
Thanks
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 2,819
Default Keep todays date, tomorrow

perhaps Copy, Paste Special, Value.

KJ wrote:

On a quoting file I use, I use today's date as =today()
Just one less field I have to enter. Is there a formula I'm missing that
would save the date I created or saved the file?
ei: I open my generic/blank file today on 1/8, save it as a quote number. I
want the quote to say 1/8 'til the end of time. Is there a formula that will
pull the saved date instead of "today()"?
Thanks


  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 303
Default Keep todays date, tomorrow

Say your date is in cell G1 on sheet1
enter the macro below into the workbook code.
To get there ,,,,,,,,right click onto the excel sign next to the "file" menu
on the top menu bar
select view code

select "workbook" in the top left dropdown and "before save" in the right
dropdown


You'll see.............
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
End Sub

Copy the following lines............and paste them between Private
Sub...........and End Sub

Sheet1.Select
Range("g1").Copy
Range("G1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False

So the end result will be...............

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheet1.Select
Range("G1").Copy
Range("G1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

From now each time you save the workbook the contents of cell G1 will be
copied and pasted
as a value.

--
Greetings from New Zealand

"KJ" wrote in message
...
On a quoting file I use, I use today's date as =today()
Just one less field I have to enter. Is there a formula I'm missing that
would save the date I created or saved the file?
ei: I open my generic/blank file today on 1/8, save it as a quote number.
I
want the quote to say 1/8 'til the end of time. Is there a formula that
will
pull the saved date instead of "today()"?
Thanks



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Exel increment date problem wrt todays date. [email protected] Excel Worksheet Functions 1 November 11th 07 06:58 PM
Automatically filling date of today (without it changing tomorrow) Jaydubs Excel Discussion (Misc queries) 5 June 27th 06 05:11 PM
Todays date rexmann Excel Discussion (Misc queries) 5 January 12th 06 03:18 PM
Create a button that will date stamp todays date in a cell Tom Meacham Excel Discussion (Misc queries) 3 January 11th 06 01:08 AM
When I open my past invoice it keeps changing date to todays date Stop date changing to todays in Excel Excel Worksheet Functions 2 October 7th 05 04:54 PM


All times are GMT +1. The time now is 03:08 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"