VBA/Excel/Access/Word/File Path/Print to File

Logging Excel usage

   <source lang="vb">

Private Sub Workbook_Open()

   Open Application.Path & "\text.txt" For Append As #1
   Print #1, "Started " & Now
   Close #1

End Sub

</source>