Вопрос
В Excel 2000 при копировании листа
Sheets("Name").Copy After:="NameA"
Где-то на 26-31-й копии возникает ошибка #1004 и лист не копируется. Что это за глюк? Как с ним бороться?
Ответ
Используй следующий метод: не Sheets("Name").Copy, а ActiveSheet.Copy
str1 = ActiveSheet.Name + "_svod"
ActiveSheet.Name = "proverka"
ActiveSheet.Copy before:=Workbooks(WBN).Worksheets("START")
ActiveSheet.Copy before:=Worksheets(Worksheets.Count)
zhebelev
Copyright 2000-2004 Сообщество Чайников
Контактная информация