Question

我正在尝试使用以下内容将一些图片放入Excel表格中：

<Input value={this.state.someValue} />

两个Pictures.Insert和Shapes.Addpicture只是在正确的位置给我一个矩形，其中包含“无法显示链接的图像。文件可能已被移动，重命名或删除。验证链接指向正确的文件和位置“

我很确定我的文件路径是正确的。有没有人对这个问题有任何见解？

Answer 1

代码适用于我并插入图片两次。第一次扭曲（来自Shapes.Addpicture），第二次以其原始大小。

以下是具有有效路径的代码示例。

Sub Addpicture()
   Dim strPath
   Dim p As Object
   strPath = "D:\folder\subfolder\image.jpg"
   Set p = ActiveSheet.Shapes.Addpicture(strPath, msoCTrue, msoTrue, 1000, 10, 86, 129)
   ActiveSheet.Pictures.Insert (strPath)
End Sub

您可能需要仔细检查路径并确认您可以访问该文件。

添加图片无法显示链接的图像。 Excel VBA

1 个答案: