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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 24.11.2014, 16:03   #1
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию Помогите с макросом создания листа-вкладки

Кто знает макрос по копированию текущего листа-вкладки из ЛЮБОГО листа в Excel?
Знание надмевает, а любовь назидает

Последний раз редактировалось Оксана33; 24.11.2014 в 18:09.
Оксана33 вне форума Ответить с цитированием
Старый 24.11.2014, 16:27   #2
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

Цитата:
листа-вкладки из ЛЮБОГО листа
надеюсь это лист ексель из какой-то книги
читайте
метод copy обьекта worksheet
(или... можете 1 раз скопировать лист вручную, запустив предварительно запись макроса, а потом смотрите, как рекордер оформил эту задачу)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 24.11.2014, 17:06   #3
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию

Да, но макрос записывает конкретное имя, т.е. лист1 и т.д. А мне нужно чтоб любой
Знание надмевает, а любовь назидает
Оксана33 вне форума Ответить с цитированием
Старый 24.11.2014, 17:16   #4
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

правильно, Вы получаете заготовку, которую нужно подправить под свои нужды.
Удачи!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 24.11.2014, 17:22   #5
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию

А есть в синтаксисе Вижуал определение там... Любой или Активный?
Знание надмевает, а любовь назидает
Оксана33 вне форума Ответить с цитированием
Старый 24.11.2014, 17:45   #6
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

ActiveSheet
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 24.11.2014, 17:50   #7
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию

Спасибо, Игорь
Знание надмевает, а любовь назидает
Оксана33 вне форума Ответить с цитированием
Старый 24.11.2014, 18:16   #8
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию

Игорь, вот модель обычной копии
Sheets("test").Copy After:=Sheets(13)

я пробовала так
ActiveSheet.Copy After:=Sheets или ActiveSheet.Copy After:=ActiveSheet

где ошибка - не выходит
Знание надмевает, а любовь назидает
Оксана33 вне форума Ответить с цитированием
Старый 24.11.2014, 18:29   #9
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

это должно бы работать сразу:
Код:
ActiveSheet.Copy After:=ActiveSheet
а скопировать текущий за последний лист так:
Код:
ActiveSheet.Copy after:=Worksheets(Worksheets.Count)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 24.11.2014, 19:03   #10
Оксана33
Форумчанин
 
Аватар для Оксана33
 
Регистрация: 24.11.2014
Сообщений: 156
По умолчанию

Игорь, огромное спасибо за
ActiveSheet.Copy after:=Worksheets(Worksheets.Count)

все работает!
Знание надмевает, а любовь назидает
Оксана33 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Защита листа вновь созданой макросом книги. КаМММ Microsoft Office Excel 1 27.04.2009 06:14
Макрос для создания нового листа в др.книге natty29 Microsoft Office Excel 3 14.02.2009 06:46
Помогите с макросом Romuald Microsoft Office Excel 23 05.02.2009 11:51
Копирование листа в другую книгу макросом xamillion Microsoft Office Excel 9 11.10.2008 08:59
Помогите с макросом SoFuWa Microsoft Office Excel 7 15.08.2008 15:26