vba中的自定义函数问题。

在对应的工程模块中定义了以下函数，
Function Matchch(List As String) As String
Dim box As String
box = Left(List, 12)
Matchch = ""
If box Like "*上海*" Then Matchch = "上海公司"
End Function
到是在 A1单元个中输入 "中国上海" 然后把自定义函数运用到 A2 单元格出现了错误#VALUE!
不是预想的显示结果:"上海公司"
不知道错在哪里请大虾们帮忙解决。
谢谢。。