2020 年 4月 19 日随笔档案 - jes

VBA操作WORD（七）设置每一级大纲式样

摘要：摘抄自网络的一些代码，以备后用，部分也有修改。部分来源于： https://zhuanlan.zhihu.com/p/35695960 Sub 设置每一级样式格式() With ActiveDocument.Styles(wdStyleHeading1).Font .Color = wdColor 阅读全文

posted @ 2020-04-19 22:44 jes 阅读(4726) 评论(0) 推荐(0)

VBA操作WORD（六）另存为不含宏的文档

摘要： Sub 另存为不含宏的文档() Application.DisplayAlerts = False Application.ScreenUpdating = False Dim oDoc As Document Set oDoc = Word.ActiveDocument Dim oRng As R 阅读全文

posted @ 2020-04-19 21:19 jes 阅读(3666) 评论(0) 推荐(0)

vba 用文档第一句话作为文件名另存为新文档

摘要： ActiveDocument.Paragraphs(1).Range.Text vba一直提醒出错，后来MsgBox(ActiveDocument.Paragraphs(1).Range.Text & ".doc")后发现中间还有个换行符，怪不得老是提醒错误。阅读全文

posted @ 2020-04-19 11:32 jes 阅读(1284) 评论(0) 推荐(0)

奋斗中...

公告