同行内换行?l那么,同行内换行?一起来了解一下吧。
需要分两步
第一是选中这一列
数据——分列——分隔符号——下一步 符号选择空格——下一步——完成
这样会1个字占一个单元格,但是横向排列的
第二部
复制这些数字
到一个新的区域,右键——选择性粘贴——转置
有一种方法是 你这样写
这样就搞定了 看清楚了没有? 你可以试试
绝对管用的方法:
在自定义工具栏里---(添加)---全部工具---“内容重排”命令
把你复制的内容粘贴到第一个单元格内,选择该单元格,点击工具栏上的“内容重排”按钮,Done,自动按照行宽来换行(换单元格)
Sub 换行()
'
' 换行 宏
'
'
Selection.MoveDown Unit:=wdLine, Count:=3
Selection.TypeParagraph
Selection.TypeParagraph
End Sub
用宏:
Sub test()
With Selection
.HomeKey wdStory
.MoveDown , 2
.EndKey wdLine
.TypeParagraph
Do While .Start < ActiveDocument.Content.End - 1
.MoveDown , 3
.EndKey wdLine
.TypeParagraph
Loop
End With
End Sub
以上就是同行内换行的全部内容。