只有平平淡淡才是真。

Word中隔行删除的几种办法

上一篇 / 下一篇  2008-03-01 21:05:09

  • 文件版本: V1.0
  • 开发商: 本站原创
  • 文件来源: 本地
  • 界面语言: 简体中文
  • 授权方式: 免费
  • 运行平台: Win9X/Win2000/WinXP
                                Word中隔行删除的几种办法
在使用Word的时候,如果需要将文档中的内容隔行删除,通常有几下几种办法:
3`!D~.Zx#|0
  • 隔行多选删除
    ej[j"e4B.C0按住Ctrl的同时点击欲删除的行,将其全部选定后删除。这种办法只适用于文档内容不多的情况。
    ]A6| RFM)Z cp0
  • 表格文本互换(手动删除)
    .LEQH Y&A0全选内容,依次点击表格-转换-文本转换为表格,列数为“2”,文字分隔位置为“段落标记”,点击“确定”。
    trA"S3bF Z0
    • 全选第二列,右键-删除列。
      bvX*nQ)I*fQ0
    • 全选表格,依次点击表格-转换-表格转换为文本。牛津英语教研博客%K1o:d ` SY
  • 表格文本互换(VBA删除)
    -{$g!v/w(rM1El0
      牛津英语教研博客"]bf&F \cO
    • 将内容转换为表格,方法参见上一方法;
      4Ie7U;p9ei"~0
    • 在VBA编辑器里写以下代码
      复制内容到剪贴板
      代码:
      Sub test()
      3m1Bvs,q*@0  Dim i As Integer
      o N'C'e/eQ}0  With Selection牛津英语教研博客 r/SX e;z'k,e
          If .Information(wdWithInTable) Then牛津英语教研博客a*XQ)Qyg7ux:MN4W y
            If MsgBox("是否开始隔行删除内容???", vbOKCancel) = vbCancel Then Exit Sub
      e;@"qTSb[7U`L:h0      i = .Information(wdEndOfRangeRowNumber)牛津英语教研博客rP'y)n;gm:j
            Do While i < Tables(1).Rows.Count
      i1k1bw!}!Uf0        .Tables(1).Rows(i).Delete牛津英语教研博客Ea,i;D~0\I7|
              i = i + 1
      h~8dyvC'JZ0      Loop牛津英语教研博客{ f{;~+U|t3A.}
          End If牛津英语教研博客#FFsX*v$}X+qYh
        End With牛津英语教研博客,RC"r)s KsL5y L
      End Sub
    • 将光标定位于表格第一行,运行代码,可将表格隔行删除。
      ;p'B7`5fdz0
    • 将表格转换为文本。
      $Tb;YQ;o%`t0
  • 录制宏实现隔行删除牛津英语教研博客 vx2|4UA$N
      牛津英语教研博客szkv,d-a Q|-cvsC
    • 将光标定位于第一行行首,开始录制宏;
      P D\'X+AoH0
    • 按Shift同时按End,全选第一行,按Del删除,按向下一次,结束录制;
      o:w/H|gOT5v,t0
    • 为该宏指定一快捷键,按此键即可隔行删除。
      'af4R.]1i{;D0

TAG:

引用 删除 Guest   /   2010-08-12 14:33:14
-1
 

评分:0

我来说两句

显示全部

:loveliness: :handshake :victory: :funk: :time: :kiss: :call: :hug: :lol :'( :Q :L ;P :$ :P :o :@ :D :( :)

Open Toolbar