write a text file vba code example

Example: vba write text file

Open ThisWorkbook.Path & "\log.txt" For Append As #1
Write #1, "Here is my text."
Write #1, "Another line."
Close #1