
此主题相关图片如下:截图_20250402110206.png

老师,这个使用了VBA代码的提示怎么处理?

此主题相关图片如下:截图_20250402111126.png
Dim ExApp As New MSExcel.Application
ExApp.Visible = True ''''''''''''显示Excel窗口,默认为不显示
On Error GoTo ErrorHandler ' 错误处理
ExApp.ScreenUpdating = False ''''禁止Excel界面刷新,大幅提升代码运行速度
ExApp.DisplayAlerts = False '''''禁止弹出对话框
ExApp.EnableEvents = False ''''''禁用事件触发
ExApp.Calculation = MSExcel.xlCalculationManual '''''停止自动计算
到这就提示错误了
帮助以外的东西学会网上搜索
https://learn.microsoft.com/zh-cn/office/vba/api/excel.xlcalculation?view=api-js-preview
ExApp.Calculation = MSExcel.XlCalculation.xlCalculationManual