Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Is there a way to use the (TODAY) function so that is saves in a saved as
worksheet as text. Here's what I'm after. I have a protected sheet that I do deal calculations on, that I save as "the deal" once I reach an agreement with my customer. Is there a way for the date to save on the "saved as" file as text so that the date doesn't change from that point forward? In other, After I save the file as the customers final deal. How do I make the date remain the same hence forward automatically? Thanks to anyone that can help. Brian |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Brian,
You can manually convert the formula to a fixed date entry by pressing F2 then F9 then Enter. The VBA equivalent is Range("A1").Value = Range("A1").Text You could set up a macro to do the SaveAs after it has fixed the date. -- John Green Sydney Australia "B. E. Smith" wrote in message ... Is there a way to use the (TODAY) function so that is saves in a saved as worksheet as text. Here's what I'm after. I have a protected sheet that I do deal calculations on, that I save as "the deal" once I reach an agreement with my customer. Is there a way for the date to save on the "saved as" file as text so that the date doesn't change from that point forward? In other, After I save the file as the customers final deal. How do I make the date remain the same hence forward automatically? Thanks to anyone that can help. Brian |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Brian,
If your not using VBA just copy and paste special (Values) Using VBA here are some options. If you already have some code runining insert this where appropriate. Range("A3") = Format(Now(), "mm/dd/yyyy") Another option would be to simply copy and then paste as a value after you save. code would look something like this. Sub Macro1() With Range("A3") .Copy .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End With End Sub A little better solution would be to make it reusable on any active cell and tie this to a key function. Drop the following code into a VBA code module. Sub SaveDateAsText() With ActiveCell .Copy .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End With End Sub Then go to tools/Macro/macros,,, click the macro SaveDateAsText click options enter a Key to asign macro to. Click OK and lose the macro Dialog. Now you can click in any cell and press ctr-(key) combination to run your macro. Hope this helps gary M. "B. E. Smith" wrote in message ... Is there a way to use the (TODAY) function so that is saves in a saved as worksheet as text. Here's what I'm after. I have a protected sheet that I do deal calculations on, that I save as "the deal" once I reach an agreement with my customer. Is there a way for the date to save on the "saved as" file as text so that the date doesn't change from that point forward? In other, After I save the file as the customers final deal. How do I make the date remain the same hence forward automatically? Thanks to anyone that can help. Brian |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
John Green wrote
You can manually convert the formula to a fixed date entry by pressing F2 then F9 then Enter. Cool. I can use that. Always learning, David |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
How can i make excel to highlight today using conditional formating | Excel Worksheet Functions | |||
Make pivotchart formatting stick after pivottable refresh. | Charts and Charting in Excel | |||
How to make the Result of a TODAY Function static? | Excel Worksheet Functions | |||
How to make the Today() function static | Excel Programming |