vba - Powerpoint VBA - ExtractAssociatedIcon - 错误 424。需要对象

Question

我在幻灯片（在 Powerpoint 上）中插入了一个列表视图控件。

我尝试使用以下代码显示所有文件和文件夹+图标：

Dim fso, objFolder, objFile, strTemp
Set fso = CreateObject("Scripting.FileSystemObject")
Set objFolder = fso.GetFolder("c:\")
For Each objFile in objFolder.Files
    ImageList21.Images.Add Icon.ExtractAssociatedIcon(objFile.Name)
    ListView31.Items.Add objFile.Name, ImageList21.Images.Count - 1
Next

我为我的项目添加了正确的引用，但是，发生了这个错误： Run-time error 424. Object required.

Answer 1

“ExtractAssociatedIcon 是一种 .NET 方法，并且您使用的是 VBA，因此您需要找到一种可用于 VBA 的替代方法。” 蒂姆·威廉姆斯