设为首页收藏本站|繁體中文

Excel 技巧网

 找回密码
 注册

QQ登录

只需一步,快速开始

手机号码,快捷登录

查看: 2523|回复: 1

[Word] 如何运用VBA在活动文档开头插入一个新段落呢?

[复制链接]
发表于 2014-6-30 15:22:18 | 显示全部楼层 |阅读模式
  • 署名作者: 0Mouse
  • 版权声明: 版权归本站与作者共有 除本站官方外非作者本人转载须经许可并注明出处
  • 本文来自:
  • 引用作品:
  • 适用版本: 2010 2007 2003以前版本 
  • 语言环境: 简体中文
  • 学习方法: 掌握Excel技巧的关键是动手操作 | 下载 ≠ 知识


  • 免费注册成为本站会员,享用更多功能,结识更多Office办公高手!

    您需要 登录 才可以下载或查看,没有帐号?注册

    x
    Q:如何运用VBA在活动文档开头插入一个新段落呢?
    A:打开文档后,按<Alt+F11>组合键,双击左侧工程资源管理器窗口的“ThisDocument”,在显示的空白窗格内粘贴以下任意一段代码,按<F5>键,完毕。
    1. Sub 写法1()
    2.     ActiveDocument.Content.InsertParagraphBefore
    3. End Sub

    4. Sub 写法2()
    5.     ActiveDocument.Range.InsertParagraphBefore
    6. End Sub

    7. Sub 写法3()
    8.     ActiveDocument.Range(0, 0).InsertParagraph
    9. End Sub

    10. Sub 写法4()
    11.     ActiveDocument.Paragraphs(1).Range.InsertParagraphBefore
    12. End Sub

    13. Sub 写法5()
    14.     With Selection
    15.         .HomeKey wdStory
    16.         .TypeParagraph
    17.     End With
    18. End Sub

    19. Sub 写法6()
    20.     With Selection
    21.         .WholeStory
    22.         .Collapse wdCollapseStart
    23.         .TypeText Chr(13)
    24.     End With
    25. End Sub
    复制代码

    附件: 运用VBA在活动文档开头插入一个新段落.rar (20.97 KB, 下载次数: 3)
    发表于 2014-12-31 08:41:37 | 显示全部楼层
    什么时候我能学会这个呢?
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    Archiver|手机版|Excel技巧网 ( 闽ICP备08107682号-2

    GMT+8, 2019-11-18 07:15

    Powered by Discuz! X3.4

    © 2001-2017 Comsenz Inc.

    快速回复 返回顶部 返回列表