ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Formula for week ending (https://www.excelbanter.com/excel-worksheet-functions/227346-formula-week-ending.html)

Nelix

Formula for week ending
 
Hi

I am putting together a time sheet to record working times from week to
week, I have a cell that contains the week ending date using the following
formula:

=TODAY()-WEEKDAY(TODAY(),2)+7

I need to make this cell only update if the file is saved, basically so that
if I open an old timesheet from say last week it wont change the week ending
date to this weeks.

Does that make sense?? lol

Hope someone can help

Sheeloo[_5_]

Formula for week ending
 
The only way to do that is to convert the formula to a value before saving...
i.e Copy and then Paste Special | Values

You can record a macro while doing that and then run that macro whenever you
want...
-------------------------------------
Pl. click ''''Yes'''' if this was helpful...



"Nelix" wrote:

Hi

I am putting together a time sheet to record working times from week to
week, I have a cell that contains the week ending date using the following
formula:

=TODAY()-WEEKDAY(TODAY(),2)+7

I need to make this cell only update if the file is saved, basically so that
if I open an old timesheet from say last week it wont change the week ending
date to this weeks.

Does that make sense?? lol

Hope someone can help


Bernd P

Formula for week ending
 
Hello,

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Range("A1") = Application.WorksheetFunction.Floor(CLng(Date) + 5,
7) + 1
End Sub


Regards,
Bernd


All times are GMT +1. The time now is 07:13 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com