I've updated the VBA version and applied some suggestions from code review post.
https://codereview.stackexchange.com/q/206017/158032
- use constants for both module and procedure names
- declare
FreeFile
as Integer - use ISO format
yyyymmddThhnnss
for log file - remove usage of
Is
inSelect Case
expression for error trap - update
Case Is <> 0
toCase Else
for error trap