-
1.word删除所有奇数行内容
在使用Word的时候，如果需要将文档中的内容隔行删除，通常有几下几种办法：
1、隔行多选删除：
按住Ctrl的同时点击欲删除的行，将其全部选定后删除。这种办法只适 用于文档内容不多的情况。
2、表格文本互换（手动删除）：
全选内容，依次点击表格-转换-文本转换为表格，列数为“2”，文字分隔位置为“段落标记”，点击“确定”。
全选第二列，右键-删除列。
全选表格，依次点击表格-转换-表格转换为文本。
3、表格文本互换（VBA删除）
将内容转换为表格，方法参见上一方法；
在VBA编辑器里写以下代码
Sub test()
Dim i As Integer
With Selection
If .Information(wdWithInTable) Then
If MsgBox（"是否开始隔行删除内容？？？"， vbOKCancel） = vbCancel Then Exit Sub
i = .Information(wdEndOfRangeRowNumber)
Do While i .Tables(1).Rows(i).Delete
i = i + 1
Loop
End If
End With
End Sub
将光标定位于表格第一行，运行代码，可将表格隔行删除。
将表格转换为文本。
4、录制宏实现隔行删除
将光标定位于第一行行首，开始录制宏；
按Shift同时按End，全选第一行，按Del删除，按向下一次，结束录制；
为该宏指定一快捷键，按此键即可隔行删除。
