Vba 选择特定样式时,检查powerpoint表格的字体颜色

Vba 选择特定样式时,检查powerpoint表格的字体颜色,vba,powerpoint,Vba,Powerpoint,我有一些具有不同表格样式的表格,您可以在表格设计上选择该选项。我需要得到表格中每个元素的字体颜色。为此,我使用以下代码和平: For i = 1 To rowNum For j = 1 To colNum table.table.Rows(i + 1).Cells(j).Shape.TextFrame.TextRange.font.color.RGB = sh.table.Rows(i + 1).Cells(j).Shape.TextFrame.TextRange.fo

我有一些具有不同表格样式的表格,您可以在表格设计上选择该选项。我需要得到表格中每个元素的字体颜色。为此,我使用以下代码和平:

For i = 1 To rowNum
    For j = 1 To colNum
         table.table.Rows(i + 1).Cells(j).Shape.TextFrame.TextRange.font.color.RGB = sh.table.Rows(i + 1).Cells(j).Shape.TextFrame.TextRange.font.color.RGB
    Next j
Next i
问题是,我得到的值是-2147483648,这是完全错误的,所以当我在“table”上触发代码时,表的字体颜色设置为0,这不是它的实际值。如何从“sh”表中获取真正的字体颜色值