I wondered if anyone could help me modify this line of code,
so instead of it copying the sheet with index 1 it would be dynamic, so that
the user could input a string and this is the sheet that would be copied.

mybook.Worksheets(1).Copy after:= _
bsebk.Sheets(bsebk.Sheets.Count)

The routine is based around Ron de Bruin's sheet copy macro, I am just
trying to get to grips with generalising it.

Thanks in advance