为什么Excel VBA有时会在更改字体大小时突出显示Powerpoint表中的单元格

时间:2017-06-26 19:08:31

标签: excel vba excel-vba powerpoint

我使用Excel VBA将表格从工作簿复制到Powerpoint,我正在使用:

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

格式化单元格的字体大小。但是,在一台计算机上,此功能突出显示单元格的内容以更改字体大小(类似于突出显示文本以手动更改字体大小的方式),并且在另一台计算机上,此行代码更改字体大小而不使用需要突出显示实际文本。有谁知道为什么这种方式不同(可能是基本的设置差异)?

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

1 个答案:

答案 0 :(得分:0)

假设形状实际上包含一个表,尝试使用Table对象的Cell方法循环遍历表中的每个单元格...

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