2021年7月21日
EXCEL:删除所有工作表中特定名称的图片
摘要： Dim x Dim sht As WorksheetFor Each sht In WorksheetsIf sht.Name <> "Sheet1" Then sht.Selectsht.Activate For Each x In ActiveSheet.DrawingObjects If x. 阅读全文
posted @ 2021-07-21 16:30 myrj 阅读(146) 评论(0) 推荐(0)
课程表：改格式宏
摘要： Sub shezhi()Dim sht As WorksheetFor Each sht In WorksheetsIf sht.Name <> "Sheet1" Then sht.Selectsht.Activate Columns("I:I").Select Selection.ColumnWi 阅读全文
posted @ 2021-07-21 16:09 myrj 阅读(201) 评论(0) 推荐(0)