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

Вход

Регистрация

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

 

= Мир MS Excel/выделение цветом ячеек по кол-ву знаков - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
выделение цветом ячеек по кол-ву знаков
Kkostay11 Дата: Понедельник, 13.07.2015, 18:40 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день.

Собираю простенькую базу по авто.
Есть столбец D в котором указывается ВИН номер автомобиля.
Можно ли сделать так чтобы ячейка выделялась. дапустим, красным цветом если количество символов в ячейке меньше или больше 17.
К сообщению приложен файл: 2961323.xlsx (17.2 Kb)
 
Ответить
СообщениеДобрый день.

Собираю простенькую базу по авто.
Есть столбец D в котором указывается ВИН номер автомобиля.
Можно ли сделать так чтобы ячейка выделялась. дапустим, красным цветом если количество символов в ячейке меньше или больше 17.

Автор - Kkostay11
Дата добавления - 13.07.2015 в 18:40
TimSha Дата: Понедельник, 13.07.2015, 18:43 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 627
Репутация: 94 ±
Замечаний: 0% ±

Excel 2013 Pro +
Можно ли сделать так чтобы

Да. Условным форматированием. Функция = ДЛСТР().


"Ctrl+S" - достойное завершение ваших гениальных мыслей!.. ;)
 
Ответить
Сообщение
Можно ли сделать так чтобы

Да. Условным форматированием. Функция = ДЛСТР().

Автор - TimSha
Дата добавления - 13.07.2015 в 18:43
Pelena Дата: Понедельник, 13.07.2015, 18:53 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 19518
Репутация: 4632 ±
Замечаний: ±

Excel 365 & Mac Excel
Ещё можно с помощью Данные -- Проверка данных вообще запретить ввод значений с неподходящей длиной строки


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЕщё можно с помощью Данные -- Проверка данных вообще запретить ввод значений с неподходящей длиной строки

Автор - Pelena
Дата добавления - 13.07.2015 в 18:53
Udik Дата: Понедельник, 13.07.2015, 19:01 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
УФ как в примере

Код
=ДЛСТР(A1)<>17
К сообщению приложен файл: UF.xlsx (9.0 Kb)


вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com
 
Ответить
СообщениеУФ как в примере

Код
=ДЛСТР(A1)<>17

Автор - Udik
Дата добавления - 13.07.2015 в 19:01
NikolayHAOS Дата: Вторник, 14.07.2015, 22:07 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Всем доброго времени суток.
Udik, чет я совсем не понял, а как ты это сделал, чтоб цвет менялся?
 
Ответить
СообщениеВсем доброго времени суток.
Udik, чет я совсем не понял, а как ты это сделал, чтоб цвет менялся?

Автор - NikolayHAOS
Дата добавления - 14.07.2015 в 22:07
sv2014 Дата: Среда, 15.07.2015, 00:25 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
Kkostay11,доброго времени суток,
можно пользоваться двумя макросами,если ваши ВИН в столбце D( и их число в диапазоне от двух до Cells.Rows.Count),
-один макрос устанавливает красную заливку,
а второй снимает в случае необходимости .

[vba]
Код
Sub example()
Dim i&, j&
j = Range("D" & Cells.Rows.Count).End(xlUp).Row
For i = 1 To j
  If Len(Range("D" & i)) <> 17 Then Range("D" & i).Interior.ColorIndex = 3
Next
End Sub
[/vba]

[vba]
Код
Sub test()
   Range("D1:D" & Range("D" & Cells.Rows.Count).End(xlUp).Row).Interior.Color _
   = xlNone
End Sub
[/vba]
 
Ответить
СообщениеKkostay11,доброго времени суток,
можно пользоваться двумя макросами,если ваши ВИН в столбце D( и их число в диапазоне от двух до Cells.Rows.Count),
-один макрос устанавливает красную заливку,
а второй снимает в случае необходимости .

[vba]
Код
Sub example()
Dim i&, j&
j = Range("D" & Cells.Rows.Count).End(xlUp).Row
For i = 1 To j
  If Len(Range("D" & i)) <> 17 Then Range("D" & i).Interior.ColorIndex = 3
Next
End Sub
[/vba]

[vba]
Код
Sub test()
   Range("D1:D" & Range("D" & Cells.Rows.Count).End(xlUp).Row).Interior.Color _
   = xlNone
End Sub
[/vba]

Автор - sv2014
Дата добавления - 15.07.2015 в 00:25
Udik Дата: Среда, 15.07.2015, 13:00 | Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
NikolayHAOS, ну я ж написал - через условное форматирование, формула туда вводится.
Ставишь указатель акт. ячейки в верхнюю ячейку столбца (в примере А1), задаёшь в уф формулу (подкорректировать не забудьте), выставляешь цвет.

уф -> управление правилами устанавливаешь диапазон
К сообщению приложен файл: 1740309.jpg (28.2 Kb) · 9493205.jpg (30.2 Kb)


вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com


Сообщение отредактировал Udik - Среда, 15.07.2015, 13:02
 
Ответить
СообщениеNikolayHAOS, ну я ж написал - через условное форматирование, формула туда вводится.
Ставишь указатель акт. ячейки в верхнюю ячейку столбца (в примере А1), задаёшь в уф формулу (подкорректировать не забудьте), выставляешь цвет.

уф -> управление правилами устанавливаешь диапазон

Автор - Udik
Дата добавления - 15.07.2015 в 13:00
  • Страница 1 из 1
  • 1
Поиск:

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