复制 PDF 图像并粘贴到工作表中

Question

我有以 PDF 格式保存的图像。我想复制这些图像并将它们粘贴到我的工作表的 A1 范围中。我曾经使用以下代码轻松地使用 PNG 文件来完成此操作：

   PictureLoc = "C:\..\example.png"
   Range("A1").Select
   Set myPict = ThisWorkbook.Worksheets("name").Pictures.Insert(PictureLoc)

但是此代码似乎不适用于 PDF 文件。你能帮我吗？

谢谢，

Answer 1

由于您需要其他工具来处理转换，最简单的本机方法是附加文件之间的链接，因此这里 A1 是外部 PDF 的导入链接，MS Edge 或任何本机系统 PDF 查看器都可以 PDF_Auto 打开。点击时。要自动化该过程，您需要在 VBA 运行时宏中记录您的操作。