Changing the Path In a Usage Log
Thanks but I was fortunate to find this solution that works for me
Private Sub Workbook_Open()
Const Log As String = "\\Shared\Main_Public\File Name\ Open.LOG"
On Error Resume Next
Open Log For Append As #1
Print #1, Environ$("userName"), Now
Close #1
wrote in message ...
move the usage.log to a directory you want. then change
the code to the path to the new path.
this code is not saving as we understand saving. it is
opening a file and printing/appending to it then closing
the file. same thing as a save in a way but different.
-----Original Message-----
The below is a macro I copied from one of the postings.
The macro
works great, however the file "usage.log" saves in the
same directory
as the workbook.
Can anyone tell me how I can save the "usage.log" to
another directoy?
Private Sub Workbook_Open()
Open ThisWorkbook.Path & "\usage.log" For Append As #1
Print #1, Environ$("userName"), Now
Close #1
End Sub
.
|