Hej igen,
Det kan jeg godt se, det er noget hø.
I toppen af koden, står der:
Private Const LogFilNavn = "Brugere.log"
Erstat denne linje med:
Public LogFilNavn As String
Længere nede i koden står der:
Private Sub Workbook_Open()
Erstat denne linje med:
Private Sub Workbook_Open()
LogFilNavn = ThisWorkbook.Name & ".log"
Luk din fil og åben den igen, så burde det virke efter hensigten
//Allan