想把EXcel冗长 公式，设置为代码，简单化操作

想把EXcel冗长 公式，设置为代码，简化操作
  我在一个EXcel的单元格计算数字时，有几十个冗长的表达式，总是重复使用
比如：
=SUM((N1月!$D$20:N1月!$D$342=C5)*(N1月!$F$20:N1月!$F$342))
+SUM((N1月!$D$354:N1月!$D$452=C5)*(N1月!$F$354:N1月!$F$452))
+SUM((N1月!$D$463:N1月!$D$467=C5)*(N1月!$F$463:N1月!$F$467))
+SUM((N1月!$D$479:N1月!$D$482=C5)*(N1月!$F$479:N1月!$F$482))
+SUM((N1月!$D$514:N1月!$D$548=C5)*(N1月!$F$514:N1月!$F$548))
+SUM((N1月!$D$559:N1月!$D$563=C5)*(N1月!$F$559:N1月!$F$563))
+SUM((N1月!$D$574:N1月!$D$578=C5)*(N1月!$F$574:N1月!$F$578))

  我想把这个表达式，定义成为一个代码（比如Y1）表示：
Y1==SUM((N1月!$D$20:N1月!$D$342=C5)*(N1月!$F$20:N1月!$F$342))
+SUM((N1月!$D$354:N1月!$D$452=C5)*(N1月!$F$354:N1月!$F$452))
+SUM((N1月!$D$463:N1月!$D$467=C5)*(N1月!$F$463:N1月!$F$467))
+SUM((N1月!$D$479:N1月!$D$482=C5)*(N1月!$F$479:N1月!$F$482))
+SUM((N1月!$D$514:N1月!$D$548=C5)*(N1月!$F$514:N1月!$F$548))
+SUM((N1月!$D$559:N1月!$D$563=C5)*(N1月!$F$559:N1月!$F$563))
+SUM((N1月!$D$574:N1月!$D$578=C5)*(N1月!$F$574:N1月!$F$578))

这样的好处是：
1、在引用时，只写代码Y1，书写简单多了。
2、特别是，当这个冗长的表达式，要修改时，只修改这个代码表达式，就行了，管理起来很方便。

不知道怎么写啊？
------解决方案--------------------
必须为新公式Y1设置合适的入参
function声明的函数都可以当做公式来用

Function Y1(S1, SS1)'参数自己调节
Y1 = "你的公式"
End Function