VBA Merge specific sheets from files in a folder

[jskasango]

VBA Merge specific sheets from files in a folder. I want my sheets to be merged into ONE sheet after matching the column headers. If its ok with you, column A can contain the source file name. Thanks in advance.

 

[Joe4]

Here is the error:
View attachment 36140

Now trying the second option.
Second option same error

That is the kind of error message you get when you have "Option Explicit" turned on (which is a good idea), and haven't declared your variable "i" before using it.
If you have "Option Explicit" turned on, you are required to declare all variables before using them.
Just put this line at the top of your code, before you try using "i".

Dim i as Long

 

[jskasango]

Try:

Dim i as Long
Lr = DestSheet.Cells(Rows.Count, i).End(xlUp).Row
For i = Lr To 3 Step -1
If  DestSheet.Cells(i, 128).Value = ""  Then DestSheet.Rows(i).Delete
Next i

 

[jskasango]

View attachment 36143

 

[Joe4]

View attachment 36144

You will need to declare ALL your variables using them.
So you need to declare "Lr" too, just liked I showed you with "i" in my last post.