Забарвлення, якщо () умова в екселі


0

Привіт спільноті,

У комірці файла excel скажімо, що я хочу ввести наступну формулу

if (a1> a2, "test1", "test2")

Я хочу досягти, щоб шрифт test1 і test2 був різного кольору.

Один із способів - це використання умовного форматування та застосування різних правил. Однак мені цікаво, чи існує альтернатива «Більше прямого підходу», визначаючи фарбування шрифту безпосередньо всередині if()формули або використовуючиVBA

Спасибі заздалегідь

Відповіді:


2

Можливо за допомогою VBA. Я припускаю, що ваша формула знаходиться в комірці B1

На робочому аркуші Excel натисніть ALT+, F11щоб отримати доступ до редактора VBA.

Виберіть аркуш на лівій панелі. У вікні правого коду виберіть зі спадного списку робочий аркуш , а потім виберіть Змінити подію з наступного спадного меню.

Наступний заповнювач для підпрограми повинен бути доступний в ньому.

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

Помістіть наступний код у тому самому.

If Target.Address = "$A$1" Or Target.Address = "$A$2" Then
  If Range("B1").Formula = "=IF(A1>A2,""test1"",""test2"")" Then

        If Range("A1").Value > Range("A2").Value Then
            Range("B1").Font.Color = vbRed
        Else
            Range("B1").Font.Color = vbGreen
        End If

  End If
End If

У наведеному вище прикладі я використовував стандартні vbRed і vbGreen. Виберіть відповідно до вашого вибору.

введіть тут опис зображення

Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.