Доброго время суток почему страница нормально копируется в ту же книгу, а вот если хочу скопировать в другую, то ругается, что subscript out of range ? вообще же хочу добавлять копию активной страницы в заранее известную книгу On Error GoTo err_copy ActiveWorkbook.ActiveSheet.Copy , after:=Workbooks.Item("Книга1.xls").Sheets("Лист1") ' все номально Книга1-активная ' after:=Workbooks.Item("Книга2").Sheets("Лист1") -- не хочет! GoTo after_copy err_copy: MsgBox (Err.Source + ": " + Err.Description), vbOKOnly, "Error" after_copy: как это сделать по-нормальному ? спасибо
Здравствуйте, вова! Надо написать расширение файла, если книга сохранена: ActiveWorkbook.ActiveSheet.Copy , Workbooks("Книга2.xls").Sheets("Лист1") ' -- не хочет! и, возможно, указать не имя параметра, а записывать в требуемом порядке. Почему-то имя параметра не берет. Ответ отправлен: 24.06.2003, 01:59 Отправитель: USA-Lesh
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.