Word Interop 已选中形状无法完成组合操作问题求助

核心问题 #

• 依赖Selection全选操作稳定性差，选区可能包含文档内隐藏的其他形状元素，不符合组合操作的要求
• Word的形状组合要求明确传入待组合的形状集合，全选选区的ShapeRange可能存在不符合条件的对象

修正后代码 #

Word.Application wordapp = new Word.Application();
Word.Document doc = wordapp.Documents.Add();
wordapp.Visible = true;

Word.Shape shNum1 = doc.Shapes.AddTextbox(MsoTextOrientation.msoTextOrientationHorizontal, 100, 100, 10, 10);
shNum1.TextFrame.TextRange.Text = "123";
Word.Shape shNum2 = doc.Shapes.AddTextbox(MsoTextOrientation.msoTextOrientationHorizontal, 150, 150, 10, 10);
shNum2.TextFrame.TextRange.Text = "321";

// 直接构造待组合的形状范围，不依赖选区操作
object[] shapeArr = new object[] { shNum1.Name, shNum2.Name };
Word.ShapeRange groupRange = doc.Shapes.Range(shapeArr);
Word.Shape resultGroup = groupRange.Group();

补充说明 #

如果一定要沿用选区操作的写法，需要先校验选中形状数量，排除多余元素干扰：

doc.Shapes.SelectAll();
// 确认仅选中目标的2个文本框再执行组合
if (wordapp.Selection.ShapeRange.Count == 2)
{
    wordapp.Selection.ShapeRange.Group();
}

推荐优先使用直接构造ShapeRange的方案，不受选区状态影响，稳定性更高。

内容的提问来源于stack exchange，提问作者edward