Скопируйте лист, используя его кодовое имя, и поместите его после кодового имени указанного листа

Скопируйте лист, используя его кодовое имя, и поместите его после кодового имени указанного листа

Образец.

Worksheets("Sheet2").Copy After:=Sheets("Sheet5")

приведенный выше код работает, но использует отображаемое имя листов, а не кодовое имя листа

2 ответа

  1. Вместо указанного имени можно использовать индекс листа, например:

    Worksheets(2).Copy After:=Worksheets(5)