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

Вход

Регистрация

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

 

= Мир MS Excel/ВЫДЕЛЯТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » ВЫДЕЛЯТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ (Формулы/Formulas)
ВЫДЕЛЯТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ
БИТ Дата: Суббота, 14.11.2015, 01:55 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 169
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
не подскажите как сделать если в таблице
два или более значения повторяются выделять их одним цветом!
Если другие два или более значения повторяются выделять их другим цветом!
и т.д.
для каждой группы значений свой цвет!
К сообщению приложен файл: 6577470.xlsx (8.6 Kb)
 
Ответить
Сообщениене подскажите как сделать если в таблице
два или более значения повторяются выделять их одним цветом!
Если другие два или более значения повторяются выделять их другим цветом!
и т.д.
для каждой группы значений свой цвет!
Автор - БИТ
Дата добавления - 14.11.2015 в 01:55
SLAVICK Дата: Суббота, 14.11.2015, 09:54 | Сообщение № 2
Группа: Модераторы
Ранг: Старожил
Сообщений: 2290
Репутация: 766 ±
Замечаний: 0% ±

2019
Макросом отсюда, или отсюда
Выделите ячейки и нажмите кнопку.

В примере оба варианта.
В первом больше цветов- НО максимум 55.
Во втором цветов задано немного - но можно добавлять свои цвета и задавать их.
К сообщению приложен файл: 6577470.xlsm (22.3 Kb)

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Суббота, 14.11.2015, 09:59
 
Ответить
СообщениеМакросом отсюда, или отсюда
Выделите ячейки и нажмите кнопку.

В примере оба варианта.
В первом больше цветов- НО максимум 55.
Во втором цветов задано немного - но можно добавлять свои цвета и задавать их.
Автор - SLAVICK
Дата добавления - 14.11.2015 в 09:54
БИТ Дата: Суббота, 14.11.2015, 12:19 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 169
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
отлично спасибки единственное не подскажите через какую вкладку добавлять кнопки?

и можно ли немного изменить макрос чтобы он охватывал конкретный заданный диапозон и поставить событие при изменении содержимого любой ячейки в данном диапозоне подсвечивание автоматом перерисовыволось?


Сообщение отредактировал БИТ - Суббота, 14.11.2015, 15:27
 
Ответить
Сообщениеотлично спасибки единственное не подскажите через какую вкладку добавлять кнопки?

и можно ли немного изменить макрос чтобы он охватывал конкретный заданный диапозон и поставить событие при изменении содержимого любой ячейки в данном диапозоне подсвечивание автоматом перерисовыволось?
Автор - БИТ
Дата добавления - 14.11.2015 в 12:19
БИТ Дата: Суббота, 14.11.2015, 15:26 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 169
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
И если можно показать какая часть кода отвечает за определенный выделенный диапозон!
И какая часть кода отвечает за наступление события (если значения в одной ячейке в заданном диапозоне поменяется то заново запускается макрос и снова подсвечиваются соответствующие значения)?
 
Ответить
СообщениеИ если можно показать какая часть кода отвечает за определенный выделенный диапозон!
И какая часть кода отвечает за наступление события (если значения в одной ячейке в заданном диапозоне поменяется то заново запускается макрос и снова подсвечиваются соответствующие значения)?
Автор - БИТ
Дата добавления - 14.11.2015 в 15:26
SLAVICK Дата: Суббота, 14.11.2015, 20:19 | Сообщение № 5
Группа: Модераторы
Ранг: Старожил
Сообщений: 2290
Репутация: 766 ±
Замечаний: 0% ±

2019
Цитата БИТ, 14.11.2015 в 12:19, в сообщении № 3
можно ли немного изменить макрос чтобы он охватывал конкретный заданный диапозон

Можно - для этого замените :
[vba]
Код
Selection
на
Range("a1:a100")
[/vba]

Цитата БИТ, 14.11.2015 в 15:26, в сообщении № 4
И какая часть кода отвечает за наступление события

Добавил в модуль листа на изменение.
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Set changeCell = Target
    Application.ScreenUpdating = False
        Run "DuplicatesColoring"
        Run "ВыделитьДубликатыРазнымиЦветами"
    Application.ScreenUpdating = True
End Sub
[/vba]
К сообщению приложен файл: 6577470-2-2-.xlsm (21.2 Kb)

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Суббота, 14.11.2015, 20:42
 
Ответить
Сообщение
Цитата БИТ, 14.11.2015 в 12:19, в сообщении № 3
можно ли немного изменить макрос чтобы он охватывал конкретный заданный диапозон

Можно - для этого замените :
[vba]
Код
Selection
на
Range("a1:a100")
[/vba]

Цитата БИТ, 14.11.2015 в 15:26, в сообщении № 4
И какая часть кода отвечает за наступление события

Добавил в модуль листа на изменение.
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Set changeCell = Target
    Application.ScreenUpdating = False
        Run "DuplicatesColoring"
        Run "ВыделитьДубликатыРазнымиЦветами"
    Application.ScreenUpdating = True
End Sub
[/vba]
Автор - SLAVICK
Дата добавления - 14.11.2015 в 20:19
БИТ Дата: Суббота, 14.11.2015, 21:13 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 169
Репутация: 0 ±
Замечаний: 40% ±

Excel 2010
СПАСИБО!!!
 
Ответить
СообщениеСПАСИБО!!!
Автор - БИТ
Дата добавления - 14.11.2015 в 21:13
АЛЕКСАНДР1986 Дата: Воскресенье, 15.11.2015, 20:00 | Сообщение № 7
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 169
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Не подскажите я также использую эти макросы но они почему-то у меня не работают не подскажите что я делаю не так?
К сообщению приложен файл: 0589291.rar (67.3 Kb)


Сообщение отредактировал АЛЕКСАНДР1986 - Воскресенье, 15.11.2015, 20:01
 
Ответить
СообщениеНе подскажите я также использую эти макросы но они почему-то у меня не работают не подскажите что я делаю не так?
Автор - АЛЕКСАНДР1986
Дата добавления - 15.11.2015 в 20:00
SLAVICK Дата: Понедельник, 16.11.2015, 10:37 | Сообщение № 8
Группа: Модераторы
Ранг: Старожил
Сообщений: 2290
Репутация: 766 ±
Замечаний: 0% ±

2019
Цитата АЛЕКСАНДР1986, 15.11.2015 в 20:00, в сообщении № 7
что я делаю не так?

Вы не поместили макрос :

В модуль листа :D .
Вот держите.

зы
А что это у вас за диапазон такой: Range("am532:b0781") ?
(два раза верно :Range("am532:bo781"), а один раз Range("am532:b0781")) %)
К сообщению приложен файл: 7497626.zip (74.1 Kb)

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Понедельник, 16.11.2015, 10:50
 
Ответить
Сообщение
Цитата АЛЕКСАНДР1986, 15.11.2015 в 20:00, в сообщении № 7
что я делаю не так?

Вы не поместили макрос :

В модуль листа :D .
Вот держите.

зы
А что это у вас за диапазон такой: Range("am532:b0781") ?
(два раза верно :Range("am532:bo781"), а один раз Range("am532:b0781")) %)
Автор - SLAVICK
Дата добавления - 16.11.2015 в 10:37
Мир MS Excel » Вопросы и решения » Вопросы по Excel » ВЫДЕЛЯТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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