Hi All,

I am in search of a VBA for the following requirement.

I have multiple folders having same file.
I need to search all these folders and open the specific file specified and delete the data connections from each file.

Eg : I have the below folders.
Folder1: Report Week1
Folder2 : Report Week2
Folder3: Report Week3 etc

I have the file Salesreport_currentweek.xlsx in all these folders.
I need to search each folder for the report Salesreport_currentweek.xlsx and delete the dataconnections in the report.

I have the below VBA to open and delete dataconnections from a single report.

Sub Deleteconnections()
Dim MyFolder As String
Dim MyFile As String
Workbooks.Open Filename:="D:\Test folder\Report Week1\Salesreport_currentweek.xlsx"
ActiveWorkbook.Connections("Dataconnections_currentweek").Delete
End Sub

Can anyone of you please help me to search each folder for the specific report and then delete the data connections?

Regards
Rachan