Я создаю надстройку (используя Add-in Express) для добавления сочетаний клавиш для функций группировки и выравнивания фигур в PowerPoint.Я хочу использовать ту же функциональность, что и встроенные функции, но у меня возникают проблемы с воспроизведением поведения отмены групповой функции.
Обычно, если пользователь группирует несколько фигур, а затем нажимает отмену ( Ctrl + Z ), объекты будут разгруппированы и останутся выделенными.Когда я группирую фигуры, используя следующее, а затем нажимаю отмену, выделение очищается.
Private Sub ObjectGroup()
PowerPointApp.StartNewUndoEntry()
If PowerPointApp.ActiveWindow.Selection.Type <> 0 Then
If PowerPointApp.ActiveWindow.Selection.ShapeRange.Count > 1 Then
PowerPointApp.ActiveWindow.Selection.ShapeRange.Group().Select()
End If
End If
End Sub
Как мне воспроизвести нормальное поведение группы / отмены?Это проблема с моей функцией группировки или это будет где-то еще?
Редактировать: (решил мою проблему)
Замена
PowerPointApp.ActiveWindow.Selection.ShapeRange.Group().Select()
с
PowerPointApp.CommandBars.ExecuteMso("ObjectsGroup")
, кажется, добивается цели.Я все еще хотел бы знать, почему есть разница ...