Sheets("报价表").Copy ActiveSheet.Cells.Copy ActiveSheet.Cells.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ActiveWorkbook.Close SaveChanges:=True, _ Filename:=Path & "D:\1\" & Range("g4") End Sub 这段代码有什么问题?为什么保存时提示“无法在未启用宏的工作簿中保存以下功能”