creating a log sheet
"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
see if this will help you. you didn't give too specific of a description,
so hopefully this is what you're looking for
lastRow = Worksheets("log").Cells(Rows.Count, "A").End(xlUp).Row
range("A: & lastrow +1) = "your date/time stamp code"
--
Gary
"sacrum" wrote in message
...
Hi all,
I've created a method to capture current user (network username) and a
date / time stamp. I want this output to be logged on a hidden sheet
called 'log' strangely enough! How does it find the next available line
in log to output to?
tia
Gary thanks - sorry for not being clear - here is the unworking script:
Private Sub Workbook_open()
Worksheets("Frontscreen").Activate
ActiveSheet.Unprotect
Dim x
Set x = CreateObject("WSCRIPT.Network")
Dim u
u = x.UserName
t = Time
'update text box "Last Updated:"
ActiveSheet.TextBoxes("txtLogon").Text = "Welcome to IRIS " & u & " -
Access Time: " & t
ActiveSheet.Protect
lastrow = Worksheets("log").Cells(Rows.Count, "A").End(xlUp).Row
Loglisting = txtLogon.Value
Worksheets("Log").Range("A" & lastrow + 1).Value = Loglisting
End Sub
Basically when workbook opens the current user is identified and displayed
using text box. I want this value to be copied to the next available line
in a log worksheet that is hidden from the user.
|