Изменение стиля и цвета в зависимости от значения в поле через скрипт VBA - PullRequest
0 голосов
/ 11 марта 2020

Я новичок в VBA и пытаюсь перенести некоторый код, который я сделал в Swift. Благодаря некоторой помощи я прогрессирую довольно хорошо. Одно из последних произведений - условные стили. Я хотел бы добиться следующего:

У меня есть диапазон со значениями. Если третье значение 'true', я хочу, чтобы стиль шрифта в этой строке был жирным, с серым фоном для всей строки. Если это «ложь», я хочу, чтобы второе значение было красным и жирным.

styles

1 Ответ

1 голос
/ 11 марта 2020

Попробуйте:

    Sub test()

        Dim i As Long, LastRow As Long

        With ThisWorkbook.Worksheets("Sheet1")

            LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row

            For i = 1 To LastRow

                If .Range("C" & i).Value = True Then
                    With .Range("A1:C" & i)
                        .Font.Bold = True
                        .Interior.ColorIndex = 15
                    End With
                Else
                    With .Range("B" & i)
                        .Font.Bold = True
                        .Font.ColorIndex = 3
                    End With
                End If

            Next i

        End With

    End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...