绿色免费汉化软件之家,用户体验最好的软件下载基地!
当前位置： &
Word转Excel方法汇总：无需工具Word快速转Excel
Word转Excel方法汇总：无需工具Word快速转Excel
　　如何将Word转Excel?Word与Excel皆是日常生活中经常运用到的办公软件，而Word文档在平常的工作学习中经常会需要装换成Excel表格，这要怎么操作呢。接下来，绿茶小编就教大家无需工具，Word转Excel的方法。
转方法一：Word中纯文本转换Excel表格
　　优点：无需下载安装什么东西，方法也很简单易懂，适合很多电脑新手使用。
　　复制Word中的纯文本文字，也就是没有表格类型的数据，按下&Ctrl+C键&复制，对电脑不熟悉的朋友直接右键--复制。
　　打开Excel表格，右键，选择性粘贴。
　　切记此步不能直接粘贴，后面有详细的解释。
　　弹出选择性粘贴对话框，勾选粘贴，选择Unicode文本，单击确定按钮。
　　下面分别有5种粘贴形式：
　　1、Microsoft office Word文档对象：是以Word中的方式进行粘贴。
　　图片(增强型图元文件)：是以图片形式来转到Excel中。
　　HTML：以网页的方式转到Excel里(默认粘贴的方式)。
　　后面两种都是以文本的方式插入到Excel(无边框)。
上一篇文章：
下一篇文章：
网友评论已有0条评论，
热门应用推荐利用VBA将Excel表格粘贴到Word中
利用VBA将Excel表格粘贴到Word中
除非注明，文章均为原创，转载请保留链接: ，VBA交流群。
之前我们都是将Excel中的内容输入到Word中，今天来看一个将Excel表格直接转为word表格的例子。利用的就是复制粘贴，主要学习一下怎样利用VBA粘贴Excel表格到Word。
Sub Macro1() '引用Microsoft Word 1x.0 Objects Library
Dim rng As Range
Dim MyWord As New Word.Application
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set rng = [a1].CurrentRegion
With MyWord
.Visible = True
.Documents.Add
.Selection.PasteExcelTable False, False, False
'粘贴为表格
.Selection.WholeStory
.Selection.Font.Size = 12
With .Options
.DefaultBorderLineStyle = wdLineStyleSingle
.DefaultBorderLineWidth = wdLineWidth050pt
.DefaultBorderColor = wdColorAutomatic
.Selection.Tables(1).PreferredWidthType = 3
.Selection.Tables(1).PreferredWidth = .CentimetersToPoints(15)
.ActiveDocument.SaveAs Filename:=ThisWorkbook.Path & "\" & Split(Workbooks(1).Name, ".")(0) & ".doc"
.ActiveDocument.Close
Set MyWord = Nothing
Application.CutCopyMode = False
Application.DisplayAlerts = True
Application.ScreenUpdating = True
MsgBox "ok"
之前我们都是用CreateObject("word.application")来创建一个Word对象，这次我们直接引用了Word组件，也就不必用 CreateObject("word.application")了，引用之后该对象的一些方法和属性就可以直接使用了。粘贴为表格的方法是PasteExcelTable。剩下的就和前面的差不多了，一些定义格式的代码直接在Word中录制个宏就可以了，代码结合英文意思或者百度一下就知道是设的哪些格式了，这里不再多说。
本节示例文件下载地址：。
咨询，程序开发，友链交换请联系博主
VBA QQ群：
注意！复制代码请用Ctrl+C！}