最简单的办法:专门用某个位置存放西瓜的价格数据(假设是Sheet3中的A1)。
然后,上图中西瓜的价格都输入=Sheet3!A1
这样,只要修改Sheet3中的A1,就达到了统一修改西瓜价格的目的
你的问题一定要用VBA做,既然你懂得用VBA,我就只提供一个解决方法给你,实际写作就留给你做好了。你可以用一个For循环搜A列,寻「西瓜」,读出对应的所有「价钱」(B列),比较所有西瓜价钱,「不同的」,就是你最新改的,于是把所有西瓜价钱全改成新价,完了。
建议新建一张单价表,你的这个表去引用单价表。
修改单价在单价表中进行。
参照附件