|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
24.12.2011, 16:56 | #1 |
Пользователь
Регистрация: 24.12.2011
Сообщений: 70
|
скопировать листик и открыть книжечку )
День добрый, PRO =)
С наступающим Вас праздником! ) У меня есть 2 небольших вопросика,не очень сложных. Наверное, не хватает пары строчек в нижеприведенном коде) 1) Как скопировать лист с именем "list1" в пустой уже существующий лист ""list2" я пробовала вот так: Sub Cop() ActiveWorkbook.Sheets("list1").Copy after:=ActiveWorkbook.Sheets("list1 ") ActiveSheet.Name = "list2" End Sub Но при такой функции лист list2 создается динамически. а как скопировать list1 в list2, который уже существует? У меня есть функция, которая очищает его при запуске макроса. Но поскольку очищение предшествует созданию этого листа, выпрыгивает DEBUG. 2) Подскажите, пожалуйста, как по завершению процедур обработки открыть книгу, в которую копировались листы. Копировала я так: Sheets(Array("list1","list2","list3 ","list4")).Select Sheets(Array("list1","list2","list3 ","list4")).Copy. Это ведь через команду типа ActiveWorkbooks.Open можно сделать, верно? Необходимо,чтобы книга с этими листами просто открылась, и если пользователь захотел, он бы сам сохранил её по необходимым ему именем стандартными средствами Эксель.
Peace!
Последний раз редактировалось Blame; 24.12.2011 в 17:05. |
24.12.2011, 17:32 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
1)
Sheets("list1").cells.Copy destination:=Sheets("list2").cells( 1,1) 2) workbooks(N).activate вместо N напишите номер или или книги.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
24.12.2011, 18:06 | #3 | |
Пользователь
Регистрация: 24.12.2011
Сообщений: 70
|
Игорь,Спасибо Вам!
1) Перенос данных из листа в лист без проблем получилось! ) Огромное шпашибо!! 2) Цитата:
Вы, наверное пропустили слово "имя" ? =) Номер/имя какой книги необходимо вписать в скобочки? Той, в которой макрос(рабочей) или той, в которую происходит копирование? Я ведь без автоматического сохранения книги делаю.
Peace!
|
|
25.12.2011, 05:21 | #4 |
Пользователь
Регистрация: 24.12.2011
Сообщений: 70
|
^___^
Разобралась до конца))
Все заработало,как надо!!! гип-гип ураа )) Спасибо!!!
Peace!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как скопировать? | onsite | Microsoft Office Excel | 2 | 13.07.2011 12:20 |
Скопировать дерево | Anny_Apple | Помощь студентам | 3 | 17.05.2011 18:25 |
Скопировать GroupBox | a_n_n_a | Общие вопросы Delphi | 5 | 15.03.2011 10:30 |
Скопировать файлы | мимо | Общие вопросы Delphi | 3 | 06.10.2010 12:57 |
Скопировать элемент | Ronder | Помощь студентам | 8 | 29.08.2009 16:43 |