vba如何把word表格内容填到excel里
如果说填写,这个比较复杂,而且很难实现,因为word的VBA都是跟跟键盘操作,和界面操作有关的。
所以,如果可能,可以考虑用VBA来复制表格,然后粘贴到EXCEL中,对于比较简单的表格,内容是可以完全匹配的。
首先,你要知道如何用键盘来选择整个表格,然后复制,把这些操作录制下来,然后复制代码。
。
如果你是要从EXCEL 的VBA 入手,那么你需要在VBA引用中添加WORD Libary 11.0 如果是从WORD的VBA入手,那么就要添加EXCEL LIBARY 11.0 (OFFICE 2007 是 12.0)然后就是需要知道EXCEL中粘贴的代码,如果我记得不错的话,是:cells(1,1).paste这个,你也可以通过录制来得到。
如果你需要知道具体的操作方案,你当然也应该吧分数提高。
。
。
[求解] :excel vba替换word文档的内容问题!谢谢!
展开全部答:可以更改循环替换这组代码:For i = 23 To 32 Step 1'替换cells(23,23)到cells(32,24)里面对应的内容WdApp.Selection.Find.Replacement.ClearFormattingWith WdApp.Selection.Find.ClearFormatting.Text = Sheets("明细").Cells(i, 23).Value.Replacement.ClearFormatting.Replacement.Text = Sheets("明细").Cells(i, 24).Value.Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinueEnd WithNext i为:For i = 23 To 32 Step 1Wd.Range.Find.Execute findtext:=Sheets("明细").Cells(i, 23).Value, MatchWildcards:=True, ReplaceWith:=Sheets("明细").Cells(i, 24).ValueNext i
转载请注明出处51数据库 » excel vba word 替换表格内