Both of my subs have recently stopped working out of the blue. This first function copies the contents of a .txt file, sorts them, and sends them to the appropriate tables., and I've no idea why it stopped working.
I can't seem to resolve the Issue since i use the code snippet from this sub multiple times and it works fine.. Code here `
' Objective: Read txt files and extract information
For Each wksImport In wkbImbarq.Worksheets
If StrComp(Left(wksImport.Name, 1), "R", vbBinaryCompare) = 0 Then
With tblDataBody
.gsInitializeWithValues wkbImbarq.Name, wksImport.Name, wksImport.Name & ".tbl"
.gsDeleteTableContent
.gsDeleteTableHeaderContent
End With
Set tblDataBody = Nothing
End If
Next wksImport
`