摘要:
Sub LayoutForExamPaper() '其他想法: '1自动顺题号,修改引言中完成下列各题的题号 '2综合题每一问空白处理 Dim StartTime As Variant Dim UsedTime As Variant StartTime = VBA.Timer Application.ScreenUpdating = Fal... 阅读全文
摘要:
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... 阅读全文