View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming,microsoft.public.excel.misc
sacrum
 
Posts: n/a
Default 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.