show current date in the cell,but tomorrow- no change this..

[@lien]

hi,

in the first time, please scuse me my english language. thanks

I have a little problem (but for me is like a break); I want, when I change some in a cell, in the other cell, show me current date. I try with "today()", but , next day when I open that workbook, in that cell, show me the date coresponding with the next day (normaly).
How ,I can rezolve this? I want to blocked that cell, only view, but no acces for change enithing.

thank you

 

[Cbrine]

Welcome to the board!!!

ctrl-;

will insert the date in the active cell.

Take a look at shortcuts in the online help to see what others are available.

HTH
Cal

 

[@lien]

thanks for information, but i need show the date , automatic (shot). Also, when I write, a number in the "A6" cell ; in the "A1" cell - to arise the curent date . Ex.: in the "A1" :=if(A6>0, TODAY(), "") , if use "today()"- but this those not work . I want to block "A1" cell (by the way, how I do, this?); for a users.

thanks again

 

[Cbrine]

So, you want the formula =if(A6>0,Today(),"") in cell A1, but you want replace today() with a hard date value instead of the dynamic today() method?

Try this.
1. Enter the date you want to have in your formula in another cell
2. Format the cell as general, which will give you a decimal value that represents the date.
ex.Aug 1, 2006 = 38930
3. Add this value to your if formula.
ex.=if(A6>0,38930,"')
4. Format the cell A1 as a date value.
5. Test

To protect the cell, you will need to turn on the worksheet protection.
1. Tools.....protection...protect sheet
2. Add a password if you want and press OK.

All cells are detfaulted to locked, so you will need to unlock the cells you want the uses to be able to enter data into.
1. Select cell(s)
2. right click on highlighted area.
3. select format cells.
4. Click on the protection tab.
5. Unclick the checkbox for protection.
6. Press OK.
The cell will now be available even when the protection is turned on.

HTH
Cal

 

[@lien]

hi Cbrine,
thank you for your answering, but I wish doing something else, namely:
I have a table, for lot of many users; and every day (excluse:sunday,sathurday), each users, writte any.., in the few cells. Sometimes, no writte, anyone. Sometimes writte one or more users. [Each user writte in another row] . I want to see , the day (precisely), when they [each] writte in the cells; because the answering for them (users), depend by the this date (current date, when they writte in the cells).

Related to password (thanks for the help), I want to put many passwords for many different cells.

thank you for your endurance.

 

[Cbrine]

Alien,
Have you tried posting in the international forum? I'm having a difficult time determining what you want to do?

Maybe you could download the html addin and post a pic of what you are looking for?

Cal

 

[Trances]

Are you able to show the saved DATE for a file in a cell ?

 

[Cbrine]

Trances,

This will give you the last saved date. It will only work after you have saved it once at least. Just add this to a module within your workbook.

Public Function LastSaved() As Date
Dim fso As Object, f As Object

On Error GoTo ErrHandler

Set fso = CreateObject("scripting.filesystemobject")
Set f = fso.GetFile(ActiveWorkbook.Path & "\" & ActiveWorkbook.Name)

LastSaved = f.DateLastModified

Set fso = Nothing
Set f = Nothing
Exit Function

ErrHandler:
Select Case Err.Number

Case Else
    MsgBox Err.Number & " " & Err.Description
End Select
End Function

HTH
Cal

PS-Usage
=LastSaved()

 

[@lien]

hi ,
with reference to my problem , I complicate (think) ,with my explanetions.
Therefore, I want, next thing:
<< I have two cells "A1" and "A2". When I writte anything, in the "A1" cell, in the "A2" cell appear the current date (ex.:11.16.2006). But tomorrow, when I open that worksheet, in the "A2" cell, I want to see 11.16.2006 ; not the 11.17.2006. >>

I hope, you understanding, what I want to do.

thank you very much.

best regards,
from Alin.

 

[Cbrine]

Alien,
Then this should work for you.

1. Enter the date you want to have in your formula in another cell
2. Format the cell as general, which will give you a decimal value that represents the date.
ex.Aug 1, 2006 = 38930
3. Add this value to your if formula.
ex.=if(A6>0,38930,"')
4. Format the cell A1 as a date value.
5. Test