Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сохранение условного форматирования в новой сводной таблице - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сохранение условного форматирования в новой сводной таблице (Макросы/Sub)
Сохранение условного форматирования в новой сводной таблице
visak Дата: Вторник, 05.08.2014, 20:19 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 29
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Доброго всем времени! Есть сводная таблица, есть макрос, который сначала удаляет, а затем загружает сводную таблицу, но Условное форматирование не хочет работать в заданном условии. Необходимо чтобы в столбце H, при нахождении фамилий Августов, Иванов, Сидоров он выделял их цветом, но после запуска макроса, условное форматирование не желает работать в определённом диапазоне. Файл приложен. Заранее всем спасибо.
[moder]Переназовите тему. А то сейчас придет злой модератор (то есть я) и закроет ее за нарушение Правил форума.[/moder]
[moder]Вижу, поменяли. Но все равно сути вопроса новое название не отражает.
На первый раз поменял за Вас. В следующий раз просто представьте, что хотите найти свой вопрос поиском. Как бы Вы задали условие в поисковой строке? И нашли бы свой же вопрос по такому поиску?
К сообщению приложен файл: SVODNAYA.xlsm (25.8 Kb)


Сообщение отредактировал visak - Вторник, 05.08.2014, 20:26
 
Ответить
СообщениеДоброго всем времени! Есть сводная таблица, есть макрос, который сначала удаляет, а затем загружает сводную таблицу, но Условное форматирование не хочет работать в заданном условии. Необходимо чтобы в столбце H, при нахождении фамилий Августов, Иванов, Сидоров он выделял их цветом, но после запуска макроса, условное форматирование не желает работать в определённом диапазоне. Файл приложен. Заранее всем спасибо.
[moder]Переназовите тему. А то сейчас придет злой модератор (то есть я) и закроет ее за нарушение Правил форума.[/moder]
[moder]Вижу, поменяли. Но все равно сути вопроса новое название не отражает.
На первый раз поменял за Вас. В следующий раз просто представьте, что хотите найти свой вопрос поиском. Как бы Вы задали условие в поисковой строке? И нашли бы свой же вопрос по такому поиску?

Автор - visak
Дата добавления - 05.08.2014 в 20:19
_Boroda_ Дата: Вторник, 05.08.2014, 21:07 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Добавьте вниз макроса еще 3 строки (см. файл _2)[vba]
Код
        Range("H2").Copy
            Range("H2:H100").PasteSpecial Paste:=xlPasteFormats
            Application.CutCopyMode = False
[/vba]
Или как в файле _1 - сначала копируем ячейку сводной куда-нибудь в уголок, а потом вставляем оттуда в новую сводную формат и убиваем эту ячейку
К сообщению приложен файл: SVODNAYA_1.xlsm (27.9 Kb) · SVODNAYA_2.xlsm (27.2 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеДобавьте вниз макроса еще 3 строки (см. файл _2)[vba]
Код
        Range("H2").Copy
            Range("H2:H100").PasteSpecial Paste:=xlPasteFormats
            Application.CutCopyMode = False
[/vba]
Или как в файле _1 - сначала копируем ячейку сводной куда-нибудь в уголок, а потом вставляем оттуда в новую сводную формат и убиваем эту ячейку

Автор - _Boroda_
Дата добавления - 05.08.2014 в 21:07
visak Дата: Вторник, 05.08.2014, 21:25 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 29
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, Большое спасибо, всё получилось :) !
 
Ответить
Сообщение_Boroda_, Большое спасибо, всё получилось :) !

Автор - visak
Дата добавления - 05.08.2014 в 21:25
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сохранение условного форматирования в новой сводной таблице (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!