我正在尝试使用包含许多单独数据表的工作表来完成查找和替换功能,直至完成Word文档。是否可以引用TagName
的不同行以返回紧邻其下一行的TagValue
?
下面的代码可以在第7行中实现。但是,我的下一个数据表从第15行开始。我希望有一个比对每个表重复此代码更简单的选择。
For CustCol = 5 To 14
TagName = .Cells(7, CustCol).Value
TagValue = .Cells(8, CustCol).Value
With WordDoc.Content.Find
.Text = TagName
.Replacement.Text = TagValue
.Wrap = wdFindContinue
.Execute Replace:=wdReplaceAll
End With
Next CustCol
任何帮助或投入将不胜感激!