1、在Excel界面,按ALT+F11

2、在VBE界面,插入-模块

3、复制以下代码到模块Function sums(rg As Range) sums = Application.Evaluate(rg.Value)End Function

4、切换到工作表界面,输入公式=sums(a1)

5、如果用不了代码,查看百度DIY-Excel-VBA-启用宏,O(∩_∩)O谢谢
时间:2024-10-23 01:58:10
1、在Excel界面,按ALT+F11
2、在VBE界面,插入-模块
3、复制以下代码到模块Function sums(rg As Range) sums = Application.Evaluate(rg.Value)End Function
4、切换到工作表界面,输入公式=sums(a1)
5、如果用不了代码,查看百度DIY-Excel-VBA-启用宏,O(∩_∩)O谢谢