求助vba一运行就报错Sub setpicsize() '设置图片尺寸Dim n '图片个数On Error Resume Next '忽略错误For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 类型 图片ActiveDocument.InlineShapes(n).Height = 198.45 '设置图片高度为 7cmActiveDocument.InlineShapes(n).Width = 283.5 '设置图片宽度 10cmNext nEnd Sub