Unique ID

[VisualBasic]

Hi all,

What I would like to do:

Each time I open a excel file I want a cell A to have a unique ID based on Time and Seconds ie 10:23:33. (Time and Seconds it was opened)

What I would then like to do is convert this into the following format
102333

Which removes the ":"

Please help.

[royUK]

Try

Please Login or Register  to view this content.

[VisualBasic]

ok, I have added this to the Visual Basic Editor and when I open the file the cell is empty no values inside it. Do I need to call this code in my cell?

[snb]

Use:

Please Login or Register  to view this content.

For International purposes I use Sheets (1), instead of Sheet1.
I added a hyphen, otherwise the formatting "HH" doesn't make sense.
Cfr the attachment.

[royUK]

Workbook Event code should be added to the workbook code module:

Copy the Excel VBA code that you want to use
Select the workbook in which you want to store the code
Hold the Alt key, and press the F11 key, to open the Visual Basic Editor
In the Project Explorer, find your workbook, and open the list of Microsoft Excel Objects
Right-click on the ThisWorkbook object, and choose View Code
Where the cursor is flashing, choose Edit | Paste

[arthurbr]

Roy,

if I understand correctly the OP wants it to work when opening any workbook ??

Each time I open a excel file I want a cell

[VisualBasic]

Correct, whenever a user opens that specific workbook I want the cell to show the latest date and time as in the format specfied above.
Can you show me how to do this please?

[arthurbr]

Then follow steps described under post #4 and 5

[VisualBasic]

I get an erro message the object doesnt support this property or method
runtime error 438.
if i type Sheet1.Cells(1, 1) = Format(Time, "'HHMMSS")
where sheet1 is the name of my sheet
i get the following
runtime error 424
object required

[arthurbr]

Try

Please Login or Register  to view this content.

[snb]

Please reread my post:

sheets(1). not sheet1.

But why not using an Excel Formula ?

=TEXT(NOW();"HHMMSS")  

[VisualBasic]

when I use the code it returns

142638

in the cell, this doesnt look like date and time to me???


I tried using =TEXT(NOW();"HHMMSS")
but it returns the formula contains and error...

[arthurbr]

when I use the code it returns

142638

in the cell, this doesnt look like date and time to me???

You asked for the time in your first post ?

If you need date also then try

Please Login or Register  to view this content.

Please Login or Register  to view this content.

works replacing ; with , ( regional settings)

[snb]

Please reread this thread....

=TEXT(NOW();"YYYYMMDDHHMMSS")  

or

Please Login or Register  to view this content.

[arthurbr]

snb

I think the OP needs to replace the semi colon with a comm in your TEXT function