PowerPoint用VBA添加背景图片

Sub test()
    
    With ActivePresentation.Slides(1)
        .FollowMasterBackground = False
        .Background.Fill.UserPicture "C:\*****\abc.PNG"
    End With
    
End Sub