☰

PowerPoint 表格的条件格式

tag-icon • tag-icon microsoft-powerpoint conditional-formatting microsoft-powerpoint-2013
PowerPoint 表格的条件格式

相关这个问题我想知道是否有任何方法可以将条件格式应用于 PowerPoint 中的表格，没有导入 Excel 表。例如，根据表中的值更改单元格的背景颜色。

答案1

是的，但只能通过某种代码/宏来实现。您将遍历表的 .Cell 集合，检查每个单元格是否有文本，如果有，如果转换为数字的文本的值小于 0，则将单元格的 .Shape 填充设置为您喜欢的任何值。将对表的引用传递给此，例如：

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

相关内容