无法使用VBA将Excel中的图像粘贴到Powerpoint中的表中

时间:2019-06-08 23:24:43

标签: copy-paste powerpoint-vba powerpoint-2010

我正在使用VBA使用从Excel文件中提取的数据在Powerpoint中创建和填充表格。我能够正确粘贴和格式化所有文本字段。但是,我想在表的第二行中包含一个图像(徽标)。我已经将Excel设置为包括嵌入式图像(以便可以从更广泛的数据库对其进行索引匹配),但是,当我在带有图像的单元格上进行迭代时,我的代码当前仅粘贴了“ 0”文本值。

我正在使用Office2010。以下是我的工作代码,但将复制更改为copypicture并使用pastespecial无效。

'numCol和numRow只是表的列和行数

Dim a As Long, b As Long
  For a = 1 To numCol
    For b = 1 To numRow
        Cells(b, a).Copy 'iterates through my excel sheet
        myShape.Table.Cell(b, a).Shape.TextFrame.TextRange.Paste
        Next b
Next a

0 个答案:

没有答案