objfso

I have a text file of about 20 file names I generated from doing a shell dir command and placing the output in a text file. I am reading the text file row by row and doing processing after each row read. It works fine for the first 6 rows or so, then on the next row read, it stops advancing to...

Dim wb As Workbook Dim ws As Worksheet Dim objFSO, strTextFile, strData, arrLines, LineCount Dim ReceivedTrans, Mis As Integer Dim MyFolder, MyFile, MyFileName, MySheetName, ReportDate As String Dim FileType As String Dim i, j As Integer Const ForReading = 1 i = 1 j = 1 Set objFSO =...

Hello, Please can some adapt the below code to allow the files to run through sub folders? Sub Example1() Dim objFSO As Object Dim objFolder As Object Dim objFile As Object Dim i As Integer Sheet2.Activate 'Create an instance of the FileSystemObject Set objFSO =...

Hi, I'm a novice so please bear with me... I'm trying to modify some code from RDB to copy a range (one row, ~40 columns) from many workbooks (500+) into one. I just found out that the application.FileSearch which he uses has since been discontinued from Excel 2007+. I looked up a...