Мне нужно использовать условное форматирование, чтобы изменить цвет шрифта на белый в поле "Стоимость", если цифры находятся в диапазоне от 0 до 500. Я только хочу отформатировать поле "Стоимость", а не всю строку

Я был бы благодарен, если бы кто-то гений мог помочь мне с этим.

1 ответ1

1

Не может быть сделано изначально, но может быть достигнуто с помощью некоторого кода VBA. Я скопировал образец, который я подготовил ранее, который применяет форматирование к столбцу flag1 на основе его значения. Немного настройки должны заставить его делать то, что вам нужно. Вам нужно будет запустить код для обновления - он не будет пересчитываться после каждого редактирования.

Я надеюсь, что это помогает, Андрей

    Sub ApplyFormattingToFlag1()
' ===================================================================================
' ===== This section applies the formatting to the current view                 =====
' ===================================================================================
Dim t As task
Dim pj As Project
Dim boo_AnyYes
Dim app As Application
Set app = MSProject.Application
Set pj = activeProject
boo_AnyYes = False
    For Each t In pj.Tasks

        If t.Flag1 = True Then
            boo_AnyYes = True
        End If

    Next t


    With app
        .ScreenUpdating = False ' Attempt to stop the screen refreshing

        .FilterApply "&All Tasks"
        .OutlineHideSubTasks
        .OutlineShowAllTasks

        .SelectTaskColumn Column:="flag1"

        If boo_AnyYes Then
            .FontEx CellColor:=1, Pattern:=1
        Else
            .FontEx CellColor:=16, Pattern:=0
        End If

    End With
End Sub

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .