Условное форматирование PowerPoint-таблицы

Question

В связи с этим вопросом мне интересно, есть ли способ применить условное форматирование к таблице в PowerPoint, не импортируя таблицу Excel. Например, чтобы изменить цвет фона ячейки в таблице в зависимости от значения в ней.

Answer 1

Да, но только с помощью какого-либо кода / макроса. Вы бы перебрать.Коллекция ячеек таблицы, убедитесь, что в каждой ячейке есть текст, и если да, то если значение текста, преобразованного в числовое значение, равно <0, то установите ячейки.Форма заполнить на что угодно. Передайте ссылку на таблицу этому, например:

Sub FormatTheTable(oTbl As Table)
    Dim x As Long
    Dim y As Long

    With oTbl
    For x = 1 To .Rows.Count
    For y = 1 To .Columns.Count
        If .Cell(x, y).Shape.TextFrame.HasText Then
        If CDbl(.Cell(x, y).Shape.TextFrame.TextRange.Text) < 0 Then
            .Cell(x, y).Shape.Fill.ForeColor.RGB = RGB(255, 0, 0)
        End If
        End If
    Next    ' Column
    Next    ' Row
    End With    ' otbl
End Sub