I have commented out the Delete Text File and I still have the issue. If I debug and hover over 

FileContent = Input(LOF(TextFile), TextFile)
I get FileContent = "Category Review Grand Canyon - Packaged Beverages. Notice the leading quote but no ending quote. However, if I open the immediate window and do ? FileContent I get Category Review Grand Canyon - Packaged Beverages without any quotes.

Could this be the issue?