想分段计算提成，不适合用lookup函数的情况下，如何使用VBA编写呢？

不适合用lookup函数，若销量为5，刚提成为3200+2400=1400，想尝试用VBA做，但没成功，求指教呀～