三级菜单求助

thb533123

每末要输入大量的数据，但是经常输错而无法产生单价，求高手帮忙，谢谢了！！！

thb533123

最好是无论那一级数据发生变化时另外的输入数据自动清空，这样防此错误！求高手帮忙！！！

大灰狼1976

附件请测试。
说明：测试时可先将“循环计算”Sheet内数据清空，然后依次点击选择“厂商”、“规格”、“单位”，最后会将符合要求的单价自动填入单位列内，但是要注意2点：
1、符合要求的单价要唯一，不然只会填入第一个找到的数据；
2、空行按顺序填入即可，但是如果需要修改已有内容，还是要按顺序，不然会出错，当然我也加入了错误判断。     
有问题请回复。

大灰狼1976

想了一下，如果修改数据的话可能会提醒Msgbox可能会跳出多次，影响操作，所以将提示内容放在了L列单元格内，并将错误单价标注红色，恢复正确值后回复正常状态，这样应该会好一点。
附件请测试

大灰狼1976

之前竟然没想到可以用数组JOIN，多用了一个循环，重新做了一下，附件请参考。