VBA - Programmatically Finding and Appending Word Documents With Identical Names

For that you might use a macro like:

Please Login or Register  to view this content.

Change the filepaths to suit.

Thanks Macropod. Tried it and it failed. This screenshot may help.

Originally Posted by mkh862

Thanks Macropod. Tried it and it failed. This screenshot may help.

P.s
Folder 2 is a subset of Folder 1 i.e not every file in Folder 1 has a matching file in Folder 2.

It's not apparent to my why the code would have failed - especially at that point. What error message was displayed?

Originally Posted by macropod

It's not apparent to my why the code would have failed - especially at that point. What error message was displayed?

Thanks again Macropod.
To try the code, I created two test folders: Letters_1_Folder and Letters_2_Folder, the latter being the one containing the texts that are supposed to be added to the end of the files in folder1. As you see in the screenshots, only 3 of the files in folder1 have a matching file in folder2.
Looks like I got that {Run-time error ‘5’ | Invalid procedure call or argument} error because the paths were not assigned to Scr and Tgt folders properly.
I copied the code in VBA where the active document was part (1) from folder 1. I also switched the paths as following:
strFldrTgt = " C:\Merged_Docs\Letters_1_Folder "
strFldrSrc = " C:\Merged_Docs\Letters_2_Folder "
and it worked, but only the first pair of matching documents (part (2) files) were merged and the rest remained unchanged. I assume it is because the run stops at {strFlNm = Dir()} on line #23.
I am wondering if you would please create a similar pair of files and folders and see whether the code could be amended so that multiple pairs of files can be merged automatically. Thank you so much in advance.

folders.png

Hmm,

It seems the second call to Dir wipes out the first. Try:

Please Login or Register  to view this content.

Again, change the filepaths to suit.

It will if you changed the filepaths appropriately.

Apart from anything else, your filepaths are wrong. Using:
strFldrTgt = "C:\Merged Docs\" & "\Letters_1_Folder\"
strFldrSrc = "C:\Merged Docs\" & "\Letters_2_Folder\"
results in paths that look like:
C:\Merged Docs\\Letters_1_Folder\
C:\Merged Docs\\Letters_2_Folder\
You should use:
strFldrTgt = "C:\Merged Docs\Letters_1_Folder\"
strFldrSrc = "C:\Merged Docs\Letters_2_Folder\"

I have no idea what that error message means regarding the highlighted line. Does the target document have some kind of protection applied?

Other than the document containing the macro, none of the documents in Letters_1_Folder or Letters_1_Folder should be open when the macro is run.

If you're still having problems, perhaps you could attach a sample of each document to your next post.

I have just extracted the folders from your attachment (to a new folder in my Downloads folder) and run the macro against them. The documents named 'part (2).doc', 'part (4).doc' and 'part (6).doc' in the Letters_1_Folder were all updated. The others weren't updated as there were no corresponding files in the Letters_2_Folder. As I understand it, that is as it should be.

Perhaps part of the problem with how you're trying to use the macro is that you're now trying to process files in folder attached directly to C:\ instead of in folders attached to your user account.

Originally Posted by macropod

I have just extracted the folders from your attachment (to a new folder in my Downloads folder) and run the macro against them. The documents named 'part (2).doc', 'part (4).doc' and 'part (6).doc' in the Letters_1_Folder were all updated. The others weren't updated as there were no corresponding files in the Letters_2_Folder. As I understand it, that is as it should be.

Perhaps part of the problem with how you're trying to use the macro is that you're now trying to process files in folder attached directly to C:\ instead of in folders attached to your user account.

Same problem with the folders being in users' directory. Strangely, the code on the test files/folders works sporadically!
Do you think the read-only settings in the code might cause the issue? After the code is failed, opening the target files displays no content as if opening in read-only mode.

Is there any way to fix the issue of the second call of Dir function in the first edition of the code you posted? Looks like the first version of the code which is pretty straightforward would not act as odd as the second one does.

The read-only setting (which applies only to the files in the Letters_2_Folder) has no effect on the outcome; as I said, the code works fine for me with your sample files. Evidently there is something wrong with your system. Perhaps an Office repair is in order (via Windows Control Panel > Programs > Programs & Features > Microsoft Office (version) > Change > Repair).