УВАЖАЕМЫЕ ФОРУМЧАНЕ ПОМОГИТЕ СОЗДАТЬ ПРАВИЛО УСЛОВНОГО ФОРМАТИРОВАНИЯ ПРИ КОТОРОМ БУДЕТ ВЫДЕЛЯТЬСЯ СТРОКА ИЗ УСЛОВИЯ НАЛИЧИЯ В ЯЧЕЙКАХ ЗАДАННОГО ДИАПАЗОНА(ПРИЧЕМ В ЛЮБОЙ ИЗ НИХ) ЛЮБОГО ЗНАЧЕНИЯ. ПРИ ОТСУТСВИИ ЗНАЧЕНИЙ ВОЗВРАЩАТЬ ЯЧЕЙКИ К ЗНАЧЕНИЮ БЕЗ ЗАЛИВКИ.
УВАЖАЕМЫЕ ФОРУМЧАНЕ ПОМОГИТЕ СОЗДАТЬ ПРАВИЛО УСЛОВНОГО ФОРМАТИРОВАНИЯ ПРИ КОТОРОМ БУДЕТ ВЫДЕЛЯТЬСЯ СТРОКА ИЗ УСЛОВИЯ НАЛИЧИЯ В ЯЧЕЙКАХ ЗАДАННОГО ДИАПАЗОНА(ПРИЧЕМ В ЛЮБОЙ ИЗ НИХ) ЛЮБОГО ЗНАЧЕНИЯ. ПРИ ОТСУТСВИИ ЗНАЧЕНИЙ ВОЗВРАЩАТЬ ЯЧЕЙКИ К ЗНАЧЕНИЮ БЕЗ ЗАЛИВКИ.VitaliyPegushin
VitaliyPegushin, Шрифт в сообщении исправьте на нормальный. В столбце D есть правило УФ. Чем не устраивает? Возможно вам нужно выделить диапазон, например C17:J48 и установить правило
Код
=ДЛСТР(СЖПРОБЕЛЫ($D17))>0
при выполнении условия будет выделяться строка от C до J
VitaliyPegushin, Шрифт в сообщении исправьте на нормальный. В столбце D есть правило УФ. Чем не устраивает? Возможно вам нужно выделить диапазон, например C17:J48 и установить правило
Код
=ДЛСТР(СЖПРОБЕЛЫ($D17))>0
при выполнении условия будет выделяться строка от C до JAlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
VitaliyPegushin, текст, набранный заглавными буквами воспринимается как крик. На кого кричите? Я уже не говорю о том, что это нарушение Правил форума (п. 5g)
VitaliyPegushin, текст, набранный заглавными буквами воспринимается как крик. На кого кричите? Я уже не говорю о том, что это нарушение Правил форума (п. 5g)Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Извините за шрифт. Дело в том, что в ячейках настроенно условное форматирование через формулу ЕТЕКСТ, (так же попробовал =ДЛСТР(СЖПРОБЕЛЫ($D17))>0 предложеннную AlexM), при удаленнии текста срабатывает правило УФ - ячейки не выделяются цветом, но 1. при заполнении ячеек в ряде D снова - выделяется не вся строка а только часть. 2. при заполнении не первой ячейки в столбце D УФ не работает.
Извините за шрифт. Дело в том, что в ячейках настроенно условное форматирование через формулу ЕТЕКСТ, (так же попробовал =ДЛСТР(СЖПРОБЕЛЫ($D17))>0 предложеннную AlexM), при удаленнии текста срабатывает правило УФ - ячейки не выделяются цветом, но 1. при заполнении ячеек в ряде D снова - выделяется не вся строка а только часть. 2. при заполнении не первой ячейки в столбце D УФ не работает.VitaliyPegushin
В D17 и D19 разные правила УФ. Это так нужно или это ваши пробы? Выделить нужно строку от первого столбца до последнего на листе или все таки меньше, до конца таблицы? Проверка на любые значения нужна только в столбце D? Уже второй день пытаюсь от вас задание получить понятное.
В D17 и D19 разные правила УФ. Это так нужно или это ваши пробы? Выделить нужно строку от первого столбца до последнего на листе или все таки меньше, до конца таблицы? Проверка на любые значения нужна только в столбце D? Уже второй день пытаюсь от вас задание получить понятное.AlexM
Номер мобильного модема (без голосовой связи) 9269171249 МегаФон, Московский регион.
Первое условие: Строки 10 и 11 (в диапозоне С-R) должны выделяться УФ заливкой голубого цвета при условии нахождения в любой из ячеек ряда D в диапазоне с 19 по 48 и/или с 56 по 63 строку. Второе условие: Строка с 13 (в диапозоне С-R) должна выделяться УФ заливкой синего цвета при условии нахождения в любой из ячеек ряда D в диапазоне с 19 по 48 строки. Тоже условие и для строк с 14 по 16 (в диапозоне С-R) только заливка серая. Третье условие: в ряде D c 19 по 48 строку выделить ячейку ораньжевым если в ней есть текст. Все это необходимо для использования макроса выделения только заполненных ячеек:
[vba]
Код
Sub ВВОД ДАННЫХ() Dim cell As Range Application.ScreenUpdating = False For Each cell In ActiveSheet.UsedRange.Rows(1).Cells If cell.Value = "x" Then cell.EntireColumn.Hidden = True Next Application.ScreenUpdating = False For Each cell In ActiveSheet.UsedRange.Columns(4).Cells - ' имеется ввиду колнка "D" в данном примере. If cell.DisplayFormat.Interior.Color = Range("AN3").DisplayFormat.Interior.Color Then cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub
[/vba]
Который также не работает при данных условиях УФ.
Первое условие: Строки 10 и 11 (в диапозоне С-R) должны выделяться УФ заливкой голубого цвета при условии нахождения в любой из ячеек ряда D в диапазоне с 19 по 48 и/или с 56 по 63 строку. Второе условие: Строка с 13 (в диапозоне С-R) должна выделяться УФ заливкой синего цвета при условии нахождения в любой из ячеек ряда D в диапазоне с 19 по 48 строки. Тоже условие и для строк с 14 по 16 (в диапозоне С-R) только заливка серая. Третье условие: в ряде D c 19 по 48 строку выделить ячейку ораньжевым если в ней есть текст. Все это необходимо для использования макроса выделения только заполненных ячеек:
[vba]
Код
Sub ВВОД ДАННЫХ() Dim cell As Range Application.ScreenUpdating = False For Each cell In ActiveSheet.UsedRange.Rows(1).Cells If cell.Value = "x" Then cell.EntireColumn.Hidden = True Next Application.ScreenUpdating = False For Each cell In ActiveSheet.UsedRange.Columns(4).Cells - ' имеется ввиду колнка "D" в данном примере. If cell.DisplayFormat.Interior.Color = Range("AN3").DisplayFormat.Interior.Color Then cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub
[/vba]
Который также не работает при данных условиях УФ.VitaliyPegushin