Application.CommandBars.ExecuteMso（“PasteSourceFormatting”）在Powerpoint中不起作用

我试图在PowerPoint中使用VBA从Excel复制表格，然后在PowerPoint中resize。 但是，它会提示出错“select（未知号码）”。 如果我在resize之前保存它，它将正常工作。 但我不想保存它。 如何解决这个问题？ 以下是我的代码：

sld.Select sld.Application.Activate ActiveWindow.Application.CommandBars.ExecuteMso "PasteExcelChartSourceFormatting" sld.Application.CommandBars.ExecuteMso ("PasteSourceFormatting") 'sld.Application.ActivePresentation.Save With ActiveWindow.Selection.ShapeRange .Height = 7.3 * 72 .Width = 13.38 * 72 .Left = 1.45 * 72 .Top = 1.35 * 72 .ZOrder msoSendToBack End With 

最好，阿尔文

Answer 1

阿尔文，

我也遇到过这个问题。 您需要从命令栏释放焦点来修复错误。 尝试添加下面的ExecuteMso行：

 sld.Application.CommandBars.ReleaseFocus 

希望这可以帮助。