Rename multiple files in a folder with a macro - Existing Macro update

Hi,

My original thread is here:
http://www.excelforum.com/excel-prog...h-a-macro.html

I used Bernie Deitrick macro solution. See attached file.

I have multiple files in a folder and I want to rename them automatically via a macro. I use Excel 2016. Could you please update the macro for the following output:

BEFORE

The existing file names are:

Firstname Surname_SOMETEST.html
OR
Firstname Middlename Surname_SOMETEST.html

AFTER

I would like the macro to rename the files to:

Firstname Surname _ Test.html
OR
Firstname Middlename Surname_Test.html

Basically the macro should replace any text after the _ with the word "Test". If there are duplicate files with the same name, the macro should ignore those records.

Could you please help me with the requirement?

Thank you,
Ash