摘要: Sub test()Dim rg As Range, shp As ShapeRem Rem 清除图形对象For Each shp In ActiveSheet.Shapesshp.DeleteNextRem Rem 按名称插入图片Rem 下行代码,根据A列开始循环处理 Rem 遇到错误继续执行 C 阅读全文
posted @ 2020-12-16 08:53 于天云 阅读(1558) 评论(0) 推荐(0) 编辑