摘要:
Sub test() Dim rg As Range, shp As Shape Rem --------------------------------------------------- Rem 清除图形对象 For Each shp In ActiveSheet.Shapes shp.Del 阅读全文
posted @ 2016-03-05 13:49
隨風.NET
阅读(10057)
评论(0)
推荐(0)

浙公网安备 33010602011771号