Macro que guarda el registro de que usuario abre un libro

Tengo una macro que al abrir el libro, genera un registro en un .txt en dropbox con el nombre del usuario que abrió dicho archivo junto con la fecha, pero no me esta guardando el registro, antes lo tenia en RED, y funcionaba perfecto, ero cuando le cambie la ruta de guardado, ya no registra los usuarios que abren el archivo .

unction registra(Optional e As String = "")
On Error Resume Next
nbre = ThisWorkbook.Name
Open "Dropbox\Registro_Consulta\RegIn.txt" For Append As #1
texto = nbre & "," & Format(Now(), "dd/mm/yyyy hh:mm:ss") & "," & Environ("username") & "," & Application.UserName & e