我在word文档中有一个组合框(combo1),我想将它复制到另一个word文档中。 (结束游戏将循环播放100个文档)。
我不能为我的生活找出如何选择和/或复制组合框,虽然它很容易在vba之外做。
到目前为止,我已经尝试将其转换为书签,似乎选择了确定,但不会复制。
ActiveDocument.Bookmarks(combo1_bm).Select
Selection.Copy
我认为它可以作为内联形状(因为它们是如何被添加的?)完成,但是选择似乎再次起作用,但复制没有。
ActiveDocument.InlineShapes(combo1).Select
Selection.Copy
关于我接下来可以尝试的任何想法?
干杯, 迈克尔
答案 0 :(得分:1)
您使用书签的尝试非常好。您只需稍微扩展您的代码:
ActiveDocument.Bookmarks("combo1_bm").Range.Copy
....
Selection.Paste 'or different pasting procedure
请记住,在复制之前不需要选择对象。试着按我上面的说法去做。此外,不要错过名称的引号或使用书签索引来使用适当的名称。 Copy method
将复制书签的范围内并保持原始书签的位置不变。
答案 1 :(得分:0)
这应该可以解决问题。
Set ComboBox1Range = ActiveDocument.Range(Start:=ActiveDocument.Bookmarks("combo1_bm").Range.Start - 1, _
End:=ActiveDocument.Bookmarks("combo1_bm").Range.End)
ComboBox1Range.Expand Unit:=wdParagraph
ComboBox1Range.Copy