〔VBA〕Shapes.Delete-一次刪除所有圖片/圖形--v035

【一次刪除工作表內所有圖片/圖形】

Sub DeleteAllShapes()
    
    Dim shp As Shape
    For Each shp In ActiveSheet.Shapes
        shp.Delete
    Next shp

End Sub

相關課程：


章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/

※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※