Страницы: 1
RSS
Изменение размера шрифта строки в таблице по условию
 
Доброго времени суток!

В таблице более 1000 строк.
Помогите макросом сделать манипуляции над шрифтом, некоторые из которых невозможно сделать условным форматированием.
Условие, если человек в первой смене, то выделяется полностью строка в таблице.
Выделение - Шрифт "Calibri", полужирное начертание, размер 11.  
 
Цитата
ГДВ написал:
Помогите макросом сделать условное форматирование.
Так все таки УФ или макрос?
Цитата
ГДВ написал:
Шрифт "Calibri", полужирное начертание, размер 11.
УФ из перечисленного может только полужирный шрифт сделать.
 
Да, конечно, макрос. УФ такого не может.
 
см. файл  
 
Спасибо за вариант.

Если будет длинное имя или с пробелами имя (столбец С), то у меня макрос уже не работает
 
ну. если будет корректный пример от вас, мы поправим.
Я заменил в коде "первая" на "какое-то длинное длинное длинное название с пробелами" и если это ввести в столбце С, то макрос работает.
См. пример.
Кстати, тему лучше назвать как-то так: Автоматическое выделение строки в таблице по ключевому слову в столбце
Изменено: New - 22.10.2020 21:30:29
 
Попробуйте в коде "Какое-то длинное длинное/длинное (название с пробелами)" этот пример.
 
Цитата
ГДВ написал:
Попробуйте в коде "Какое-то длинное длинное/длинное (название с пробелами)" этот пример.
ну так и текст надо в нижнем регистре для сравнения писать. Ведь сравниваете тоже с нижним:
LCase(Target)
приведите строку тоже в нижний
Код
If LCase(Target) = LCase("Какое-то длинное длинное/длинное (название с пробелами)") Then
Или замените на регистронезависимое сравнение:
Код
If StrComp(Target.Value, "Какое-то длинное длинное/длинное (название с пробелами)", 1) = 0 Then
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Дмитрий, работает! СПС.

есть одно "но", выделение активируется только тогда, когда ты введёшь текст, например "Какое-то длинное длинное/длинное (название с пробелами)" и нажмёшь enter. Или если оно уже введено, нужно выделить ячейку и в строке формул поставить курсор, нажать "enter". То есть если данный пример уже есть, но мы его не активируем, через вход через строку формул, то он работать не будет. Либо Я что-то делаю не верно, не пойму.
Чёт много букв получилось, но вроде понятно описал.
 
Цитата
ГДВ написал:
УФ такого не может.
какие ваши доказательства?!
Соблюдение правил форума не освобождает от модераторского произвола
 
buchlotnik, супер.

Если, я захожу в УФ, тыкаю изменить правило, то на выбор размера шрифта "стоит запрет".
Помогите, как проделать подобное в своём рабочем файле.
Изменено: ГДВ - 25.10.2020 20:37:20
 
Цитата
ГДВ написал:
как проделать подобное в свой рабочем файле
установить Open Office и прописать правило там;
ну или вручную - создать правило, например, с курсивом, а затем зайти архиватором имя_файла/xl/styles.xml и вместо
<dxf><font><b val="0"/><i/></font></dxf> прописать
<dxf><font><b val="0"/><i/><sz val="18"/></font></dxf>

первое проще, ИМХО
Изменено: buchlotnik - 25.10.2020 01:48:02
Соблюдение правил форума не освобождает от модераторского произвола
 
buchlotnik, спс.

Вторым способом воспользовался,
показался проще, ИМХО
 
Цитата
ГДВ написал:
показался проще
ну просто не все любят в разметку ручками лазать - а так я тоже за оперативное вмешательство вместо консервативного лечения  ;)
Соблюдение правил форума не освобождает от модераторского произвола
Страницы: 1
Наверх