Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Если ячейка имеет границы, то применяем форматирование
 
#1
19.02.2019 08:47:51
Доброго времени суток, дорогие форумчане.

Необходим Ваш совет,
Как сделать так, если в ячейке появляются диагональные границы, то она меняет формат (например цвет). Желательно без VBA.  
 
 
 
#2
19.02.2019 09:08:02
Цитата
Aveld написал:
Как сделать так,
никак. Без примера совсем никак, а с примером , если зачеркивать не вручную, то есть маленький шанс.
По вопросам из тем форума, личку не читаю.
 
 
 
#3
19.02.2019 10:41:09
Зачеркиваем вручную, можно каким-нибудь образом показать, что ячейка имеет диагональные границы как, например ячейка содержит текст или число?
 
 
 
#4
19.02.2019 11:12:34
Цитата
Aveld написал:
каким-нибудь образом показать
можно, но
Цитата
Aveld написал:
без VBA
нельзя
Соблюдение правил форума не освобождает от модераторского произвола
 
 
 
#5
19.02.2019 11:22:39
Цитата
Aveld написал:
Зачеркиваем вручную, можно каким-нибудь образом показать, что
Можно попробовать вместо зачеркивания присваивать ДРУГОЙ ячейке (флагу) какое-нибудь специфическое значение; и уже по наличию данного флага автоматизировать действия с основной ячейкой - например, при помощи условного форматирования (УФ).
К сожалению, УФ [почему-то..?] не допускает использования именно диагональных границ в форматируемых ячейках... зато вместо них можно использовать зачеркнутый шрифт. И/ИЛИ менять ей цвет фона, если требуется...
В этом случае по значению флага (в доп. ячейке/ячейках) можно принимать и другие решения в отношении основной ячейки/ячеек: например, "суммировать значения по цвету"
 
 
 
#6
19.02.2019 12:12:32
Цитата
IKor написал:вместо них можно использовать зачеркнутый шрифт
Подскажите пожалуйста, как показать в формуле при создании правила в УФ, что текст зачеркнутый?

Цитата
buchlotnik написал: без VBAнельзя
Подскажите пожалуйста как сделать это в VBA
 
 
 
#7
19.02.2019 12:43:11
Цитата
Aveld написал:
Подскажите пожалуйста как ...
Добрый день!
Вы внимательно прочитали сообщ. #2 от БМВ?
Там всё понятно?
Как Вы понимаете фразу "Без примера совсем никак"?
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
 
 
#8
19.02.2019 12:49:17
Как-то так:
Код
Function Zacherk(r As Range)
    Application.Volatile
    Zacherk = r.Font.Strikethrough
End Function

И в УФ: =Zacherk(D6)
Соблюдение правил форума не освобождает от модераторского произвола
 
 
 
#9
19.02.2019 12:50:48
Цитата
Михаил Лебедев написал:
Без примера совсем никак
 
 
 
#10
19.02.2019 12:53:27
Хм, макрофункция =GET.CELL(23;Sheet1!c2)*NOW()^0 убивает Excel
Изменено: БМВ - 19.02.2019 12:53:40
По вопросам из тем форума, личку не читаю.
 
 
 
#11
19.02.2019 12:55:28
buchlotnik, огромное СПАСИБО!
 
 
 
#12
19.02.2019 13:08:18
Цитата
БМВ написал:
убивает Excel
у меня на проверке диагональных границ в УФ умирает :
Код
Function Zach(r As Range)
    Zach = r.Borders(xlDiagonalDown).LineStyle = xlContinuous And r.Borders(xlDiagonalUp).LineStyle = xlContinuous
End Function
Соблюдение правил форума не освобождает от модераторского произвола
 
 
 
#13
19.02.2019 13:37:01
никогда еще мне не удавалось с помощью УФ нарисовать диагональные линии
(возможно это руки такие, а может быть не предусмотрено в УФ)
а вот с помощью VBA - сколько угодно, но в самом первом сообщении:
Цитата
Aveld написал:
Желательно без VBA.
поэтому сразу можно было ответить без VBA - ни как, и тему закрывать на этом
или
развивать тему дальше, как это сделать с помощью VBA

P.S.
было бы очень здорово, чтобы меня кто-то поправил и рассказал, как нарисовать диагональ с помощью УФ
Изменено: Ігор Гончаренко - 19.02.2019 13:37:17
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
 
 
#14
19.02.2019 13:47:02
Ігор Гончаренко, Игорек, вы б прочитали что требуется :-) . Изначально был вопрос по диагональным линиям определять надо ли менять цвет заливки, а не наоборот :-)
По вопросам из тем форума, личку не читаю.
 
 
 
#15
19.02.2019 15:36:08
Цитата
Aveld написал:
Подскажите пожалуйста, как показать в формуле при создании правила в УФ, что текст зачеркнутый?
 
 
 
Страницы: 1
Наверх