|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
24.01.2013, 15:31 | #1 |
Пользователь
Регистрация: 21.03.2012
Сообщений: 12
|
Группа листов в книге
Добрый день!!
Столкнулся со следующей задачей: есть книга с 10-ю листами, из них три ярлычка выбраны (т.е.выбраны 3 листа с помощью клавиши Ctrl). Задача: провести операции с этой группой листов. Другими словами: как в коде VB назвать эту группу листов - что-то типа ActiveSheetArray... Спасибо за помощь! |
24.01.2013, 15:41 | #2 |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
из макроредактора:
Код:
Единственный способ стать умнее, играть с более умным противником...
|
24.01.2013, 16:12 | #3 |
Пользователь
Регистрация: 21.03.2012
Сообщений: 12
|
хм... и что дальше??..
|
24.01.2013, 16:32 | #4 |
Старожил
Регистрация: 08.02.2012
Сообщений: 2,173
|
Код:
з.ы. не забывайте, что это все-равно коллекция листов.
Правильно поставленная задача - три четверти решения.
|
24.01.2013, 16:58 | #5 |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
Единственный способ стать умнее, играть с более умным противником...
|
24.01.2013, 17:04 | #6 |
Пользователь
Регистрация: 21.03.2012
Сообщений: 12
|
опять же: для этого нужно знать имена выделенных (выделяемых) листов.
но в моем случае они выделялись не программно, а вручную с кнопкой Ctrl. поэтому гвоздем этой задачи является способ определения ВЫДЕЛЕННОГО листа. при выделении листа (нескольких листов) меняется какой-то параметр. Какой? например, что-то типа Sheets("th").Selected.............. .... я вижу такой цикл for i = 1 to Sheets.Count if Sheets(1).Selected = True (например) then 'проверяем параметр "выделенности" Arr(1) = Sheets(1).Name 'пополняем массив о котором говорил DiemonStar .... но как добраться к этому параметру????? Последний раз редактировалось a2alex; 24.01.2013 в 17:13. |
24.01.2013, 18:42 | #7 |
Пользователь
Регистрация: 21.03.2012
Сообщений: 12
|
Разобрался!
Windows(ActiveWorkbook.Name).Select edSheets это коллекция объектов типа Worksheet, где хранятся все выбранные листы Всем спасибо за помощь! Надеюсь, кому-то пригодится моя тема |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
удаление листов в книге | evdss | Microsoft Office Excel | 3 | 28.12.2010 11:55 |
Запрет удаления листов в книге | tae1980 | Microsoft Office Excel | 2 | 25.06.2010 00:22 |
Макрос для всех листов в книге | Rok | Microsoft Office Excel | 5 | 26.04.2010 08:55 |
Получить имена всех листов в книге | Temnota | Microsoft Office Excel | 6 | 26.12.2009 07:36 |
Удаление листов в книге по определённым условиям | inside9 | Microsoft Office Excel | 2 | 07.08.2009 13:37 |