Powerpoint VBA - ExtractAssociatedIcon - 오류 424. 필요한 개체

Question

슬라이드 (파워 포인트)에 listview 컨트롤을 삽입했습니다.

나는이 코드를 사용하여 모든 파일과 폴더 + 아이콘을 표시하려고 :

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와 함께 사용할 수있는 대체 메서드를 찾아야합니다. " Tim Williams