关于word文档时间排序

发布网友 发布时间：2022-04-22 22:08

我来回答

共4个回答

热心网友 时间：2022-04-28 01:39

1、在word中按下组合键alt+F11,进入vba编辑器。
2、在左上角的工程资源区双击thisdocument，在右侧的空白区域粘贴如下代码：

Sub 宏3()
Selection.HomeKey unit:=wdStory
For i = 1 To ActiveDocument.BuiltInDocumentProperties(wdPropertyCharacters) / 5
Selection.HomeKey unit:=wdLine
Selection.MoveRight unit:=wdCharacter, Count:=5, Extend:=wdExtend
Selection.InsertAfter (Chr(13))
Selection.MoveDown unit:=wdLine, Count:=1
Next
End Sub

3、按下F5试试效果。
4、将结果粘贴到EXCEL里面

热心网友 时间：2022-04-28 02:57

如果17:10和19:10这样的数之间有空格可以按楼上的做法.如果没有空格可以查找([0-9]{2})([0-9]{2})替换为\1^13\2勾上使用通配符.

热心网友 时间：2022-04-28 04:32

如果之间有空格，可以将空格全部替换为“段落标记”

查找内容内输入一个空格
替换内容内输入： ^p

热心网友 时间：2022-04-28 06:23

文本转换表格,再复制到excel

------------------------
将你的复制到A1

你直接在excel做,用公式

在A2输入,再往下填充
=MID($A$1,((ROW(A1)-1)*5+1),5)