求在Excel里面用VBA做函数.