Sub MulipleTextFiles() ‘SmartCode for Insert Multiple text file in worksheets ‘SmartExcel(www.anilnahar.com) Dim xFilesToOpen As Variant Dim I As Integer Dim xWb As Workbook Dim xTempWb As Workbook Dim xDelimiter As String Dim xScreen As Boolean On Error GoTo ErrHandler xScreen…