怀亦设计:
按alt+f11,进入vbe,双击你需要这个功能的工作表名称,输入下列代码,即可完成你的需求.PRivateSUbworksheet_change(byvaltargetasrange)withtargetif.column=1and.count=1then'设置在a列且只选择一个单元格.offset(0,1)=application.evaluate(.value)'将结果显示在b列.endifendwithendSUb如果要在b列输入,c列显示结果,将.column=1改成.....