当更改字体大小时，为什么Excel VBA有时会在PowerPoint表中突出显示细胞

Question

我正在使用Excel VBA将表从工作簿复制到PowerPoint，我正在使用：

Shape.Table.Rows.Cell.Shape.TextFrame.TextRange.Font.Size = 20

格式化单元格的字体尺寸。但是，在一台计算机上，此函数强调了单元格的内容以更改字体大小(类似于您将如何突出显示字体大小的文本(，并且在另一台计算机上，此代码行更改字体大小而没有。需要突出显示实际文本。有谁知道为什么这有不同的效果(这可能是基本设置差异(？

我不希望代码突出显示文本，因为当突出显示文本并且宏尝试将另一个表粘贴在幻灯片上时，它将表粘贴在突出显示的单元格中，而不是作为新的单独的表。

Answer 1

假设形状实际上包含一个表，请尝试使用表对象的单元格方法在表中循环遍布表...

Dim lRow As Long
Dim lCol As Long
With oShape.Table
    For lRow = 1 To .Rows.Count
        For lCol = 1 To .Columns.Count
            .Cell(lRow, lCol).Shape.TextFrame.TextRange.Font.Size = 20
        Next lCol
    Next lRow
End With