摘要: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
posted @ 2016-03-05 13:49
posted @ 2016-03-04 17:39
posted @ 2016-03-04 09:45