小乐今天给分享word怎么编辑报名表的知识，其中也会对word文档报名表怎么加照片进行解释，希望能解决你的问题，请看下面的文章阅读吧！

word怎么编辑报名表 word文档报名表怎么加照片

word怎么编辑报名表 word文档报名表怎么加照片

1、Set d = wd.documents.Open(p & f)以前写过一段VBA用来实现这个功能Cells(r, 12) = Application.Clean(.cell(13, 5).Range.Text)从很多个报名表中(.doc文档)提取表格中固定位置的内容至一个excel的汇总表中.因为vba有很强的针对性,所以无法给出具体的代码.收到了提问者发给我的示例文档,EXCEL中的VBA代码如下:Sub 汇总()Application.ScreenUpdating = Falsep = ThisWorkbook.Path & ""f = Dir(p & ".doc")Set wd = CreateObject("word.application")Dor = r + 1Cells(r, 1) = r - 2With d.tables(1)Cells(r, 3) = Application.Clean(.cell(1, 4).Range.Text) '将word表格第1行第4列的数据存入当前工作表的C列Cells(r, 4) = Application.Clean(.cell(2, 4).Range.Text) '将word表格第2行第4列的数据存入当前工作表的D列Cells(r, 5) = Application.Clean(.cell(8, 2).Range.Text)Cells(r, 6) = Application.Clean(.cell(6, 4).Range.Text)Cells(r, 7) = Application.Clean(.cell(1, 6).Range.Text)Cells(r, 8) = Application.Clean(.cell(3, 2).Range.Text)Cells(r, 9) = Application.Clean(.cell(3, 4).Range.Text)Cells(r, 10) = Application.Clean(.cell(10, 2).Range.Text)Cells(r, 11) = Application.Clean(.cell(13, 4).Range.Text)End Withd.Closef = DirLoop Until f = ""wd.QuitSet wd = NothingApplication.ScreenUpdating = TrueEnd Sub把WORD里的表格直接，再在EXCEL里面随便点一个空格粘贴，就可以直接在EXCEL里面任意编辑了。

2、在word里面全选表格，excel里面粘贴就行再进行找信息的工作直接提取是不行的，建议将WORD里的表格到EXCEL里，然后再提取。

3、应该很简单吧。

本文到这结束，希望上面文章对大家有所帮助。