word怎么将文本复制到word一行一行的表格里

　　先在尺标调整右缩进使文字宽度适当，文字设置为红色，然后运行此宏:Sub ins_enter()'by sylun excelhome'行末加硬回车for word2003 Application.ScreenUpdating = False With ActiveDocument.Content.Find .ClearFormatting .Font.Color = wdColorRed .Format = True Do While .Execute .Parent.Select With Selection Do .MoveStart wdLine, wdExtend If .Previous Like "[!" & Chr(11) & "-" & Chr(13) & "]" Then .InsertBefore Chr(13) .Start = .Start + 1 Loop Until .Type = wdSelectionIP End With Loop End With Application.ScreenUpdating = TrueEnd Sub2.复制加过硬回车的段落，选择相应数量的表行，粘贴

　　第一种方法是：选中第一行内容，点击插入--表格---文本转换成表格。然后复制表格，进excel粘贴即可。

　　第二种方法是：直接复制第一行内容进excel，选中粘贴后的表格，点击excel数据选项下的分列，根据分列向导将内容分到多个单元格中。