Sub test() Dim PPT As PowerPoint.Application Dim pres As Presentation Dim sld As Slide Dim shp As Shape Dim cht As Chart Dim rng As Object ...
確定! 回上一頁