Есть ли способ заставить условное форматирование игнорировать флаг FollowedHyperlink? - PullRequest
0 голосов
/ 06 февраля 2020

У меня есть оглавление в Excel 365. В таблице столбец 2 содержит имена рабочих таблиц, а столбец 3 содержит имена таблиц и / или именованных диапазонов в связанной рабочей таблице. Я использовал функцию HYPERLINK, чтобы связать каждую ячейку с ее указанным c компонентом: гиперссылки для столбца рабочего листа go на ячейку A1 на связанном рабочем листе; гиперссылки в столбце таблицы / именованного диапазона go на указанную таблицу или именованный диапазон c.

Поскольку это приводит к нескольким повторениям имен листа, я использовал условное форматирование, чтобы изменить текст на белый, когда Имя листа является повторением того, которое находится прямо над ним. Это делает его больше похожим на контур. Это работает как очарование до того момента, когда я нажимаю на ссылку в повторяющейся ячейке, превращая ее в FollowedHyperlink. Когда я возвращаюсь к столу, это больше не исчезает. Есть ли способ сделать так, чтобы они оставались белыми, даже после того, как они были соблюдены?

Вот формула, которую я использовал для правила условного форматирования, применив ее ко всему диапазону =$C$6:$C$24:

=C5=C6

Вот как это выглядит до того, как я щелкаю одну из выбитых ячеек:

enter image description here

Вот как это выглядит после того, как я щелкаю одну из Белые ячейки:

enter image description here

1 Ответ

0 голосов
/ 06 февраля 2020

Urdearboy опубликовал ссылку, показывающую, как изменить стиль следующей ссылки.

https://superuser.com/questions/728825/how-do-i-prevent-excel-from-changing-the-color-of-a-clicked-link/819931#819931

Вероятно, это лучшее решение без использования VBA.

Но если вы хотите, чтобы некоторые не контролировали его, например, вы можете захотеть, чтобы все ссылки в таблице были одинаковыми по цвету, независимо от того, взяты они или нет, но вы хотите, чтобы ссылки оставались в книга для изменения. Это так же просто, как одна строка VBA в событии SheetFollowHyperlink рабочего листа:

Target.Range.Font.Color = vbBlue

И если вы хотите применить его ко всей книге, а не к одному листу, вы поместите ее в событие SheetFollowHyperlink книги.

Но если вы хотите быть немного креативным ...

Вы можете заставить ссылку исчезнуть, смешав ее с цветом фона:

Target.Range.Font.Color = Target.Range.Interior.Color

Или вы можете обратите на это внимание, изменив цвет спины:

Target.Range.Interior.Color = vbYellow

Действительно, ваше воображение - это единственный предел. Вы можете делать практически все, что захотите (и гораздо больше вещей, которые вы никогда не захотите делать).

...