Dear Experts:

I got an excel file named Chapter1.xls

The fourth worksheet of this file should be renamed via VBA as
follows:

NoMatch_1

I would like to use this code (snippet) for the renaming of other
worksheets as well, such as

File name: Chapter2.xls: renaming of worksheet 4 to 'NoMatch_2'
File name: Chapter3.xls: renaming of worksheet 4 to 'NoMatch_3'

That is the number at the end of the relevant excel file name is to be
placed at the end of the fourth worksheet name. (NoMatch_relevant
number)

Help is much appreciated. Thank you very much in advance.

Regards, Andreas