Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.07.2012, 10:52   #1
palladin90
 
Регистрация: 13.06.2012
Сообщений: 3
По умолчанию Как скопировать несколько листов из одного документа в другой и сохранить связь между ними?

Есть два документа. Нужно их них сделать один. Документы состоят из нескольких листов. Листы в каждом документе связаны между собой. Как можно копировать все листы из одного документа в другой так, чтобы связь между листами сохранилась?
palladin90 вне форума Ответить с цитированием
Старый 04.07.2012, 11:25   #2
DiemonStar
Старожил
 
Регистрация: 08.02.2012
Сообщений: 2,173
По умолчанию

Код:
Sheets("Лист1").Move After:=Workbooks("Книга1").Sheets(Workbooks("Книга1").Sheets.Count)
или вместо Move использовать Copy если нужно сохранить исходные значения.

Для нескольких листов можно:

Код:
Sheets(Array("Лист1", "Лист2", "Лист3")).Move After:=Workbooks("Книга1").Sheets(Workbooks("Книга1").Sheets.Count)
Правильно поставленная задача - три четверти решения.

Последний раз редактировалось DiemonStar; 04.07.2012 в 11:37.
DiemonStar вне форума Ответить с цитированием
Старый 04.07.2012, 18:58   #3
palladin90
 
Регистрация: 13.06.2012
Сообщений: 3
По умолчанию

Цитата:
Сообщение от DiemonStar Посмотреть сообщение
Код:
Sheets("Лист1").Move After:=Workbooks("Книга1").Sheets(Workbooks("Книга1").Sheets.Count)
или вместо Move использовать Copy если нужно сохранить исходные значения.

Для нескольких листов можно:

Код:
Sheets(Array("Лист1", "Лист2", "Лист3")).Move After:=Workbooks("Книга1").Sheets(Workbooks("Книга1").Sheets.Count)
Что это за код и куда его вставлять?
palladin90 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как скопировать строки из одного файла в другой serg_k Microsoft Office Excel 1 07.06.2011 11:16
как скопировать лист оз одного документа в другой trunx Microsoft Office Word 9 14.06.2010 02:58
Как скопировать строку из одного Stringgrida в другой? Pinkygirl Общие вопросы Delphi 1 16.01.2010 23:25
Как правильно скопировать данные с одного текстового файла в другой? Dem80 Общие вопросы C/C++ 2 06.03.2009 22:17
Как скопировать текст в буфер обмена с одного edit-a и вставить в другой SeRhy Общие вопросы Delphi 2 26.07.2008 23:02