Question

我有一个Excel文件，其中包含指向基于Web的.jpeg文件的超链接。我想下载这些文件并将它们导入PowerPoint中的模板。

我有以下代码来打开单个超链接，但我不知道如何在下载文件或如何过渡到PowerPoint时管理文件。

Range("K2").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

帮助？

Answer 1

Stackoverflow不是代码编写服务。你需要自己做一些工作。

但请注意，PPT可以直接从URL添加图像。此片段会将指定URL中的图像添加到幻灯片1中，将其放置在幻灯片的左上角并使其成为“自然”大小...如果您手动执行PPT通常会将其插入的大小：

Sub AddImageExample()
    With ActivePresentation.Slides(1)
        .Shapes.AddPicture "image_url_here", False, True, 0, 0, -1, -1
    End With
End Sub

打开图像的超链接并导入PowerPoint

1 个答案: