使用VBA在PPT中导出.png透明

Question

以下代码不考虑群组。有人可以解决这个问题吗？

Sub EXPORT_PNG()
    Dim lheight As Long
    Dim lwidth As Long
        lwidth = 100
        lheight = 200
 ActivePresentation.Slides(1).Shapes(1).Export "C:\New folder\test.png", ppShapeFormat ScaleWidth:=lwidth, ScaleHeight:=lheight
End Sub