2019年4月12日
学习笔记412
摘要： Sub LayoutForExamPaper() '其他想法： '1自动顺题号，修改引言中完成下列各题的题号 '2综合题每一问空白处理 Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = Fal... 阅读全文
posted @ 2019-04-12 16:01 wangway 阅读(620) 评论(0) 推荐(0)
20190412wdVBA 排版
摘要： Sub LayoutForExamPaper() Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = False Dim oneP As Paragraph Dim rng As Range C... 阅读全文
posted @ 2019-04-12 12:28 wangway 阅读(829) 评论(0) 推荐(0)