How to log info about files while looping through many in a folder

Peterson · #1 09-30-2021, 07:45 PM

I'm creating a macro that loops through all files in a folder and does stuff if a condition is met.

The user needs a report of any files not revised because the condition wasn't met.

My code is modular: a loop sub calls another sub to test the condition/do the stuff.

I'd like to keep the code modular -- I don't want to modify the loop sub to receive failed-condition info back, and add to an array.

Is it possible to collect data (in an array) in a standalone sub that periodically gets the data from another sub, or do I have to modify my loop sub so that it can collect the data, as it's the only sub continuously running for the duration of the work? Maybe this will help:

Code:

Sub Loop()
      Open a file     
         Call EvaluateAndDoStuff
    Next file
    When no more files, drop array in CollectListOfFailedFiles into text file
End Sub
 
Sub EvaluateAndDoStuff()
    If condition not met Then
       Call CollectListOfFailedFiles(strFile)
    End If
End Sub

Sub CollectListOfFailedFiles(strFile as String)
    Array here that collects list of failed files... 
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Looping through a folder of PDF files and saving them as docx	ballpoint	Word VBA	5	11-22-2018 05:18 AM
Error 4605 when looping through files in folder and deleting comments	Peterson	Word VBA	2	04-19-2018 08:45 AM
Open csv files & copy and paste info into master file	gbaker	Outlook	9	04-22-2016 11:02 PM
VBA Word - Search Within Files Containing A String - Copy Files to New Folder	jc491	Word VBA	0	01-09-2016 12:00 PM
Move files from one folder to another	obasanla	Word	1	09-28-2012 04:42 PM