摘要: Sub 替换删除选择题括号中的选项() '2021-2-22 'dg nextseven Dim doc As Document, p As Paragraph Set doc = ThisDocument Set regex = CreateObject("VBScript.RegExp") Wi 阅读全文
posted @ 2021-02-22 14:44 wangway 阅读(148) 评论(0) 推荐(0) 编辑
摘要: 'PPT 加载宏 代码模板 Dim cmdBar As CommandBar, cmdBtn As CommandBarControl Const cmdBtnCap As String = "从Word文档导入图片" Sub Auto_Open() Call DelCmdBtn Call AddC 阅读全文
posted @ 2021-02-22 10:35 wangway 阅读(285) 评论(0) 推荐(0) 编辑