因为数据有效性不 能输出公式。你又想用下拉菜单选你要的选项的话。 我的解决方法是用VBA 的 Worksheet_Change 来监控对应列的变化。每次通过下拉菜单输入选项，输入后监控到变化自动把选项变成用index的公式 （
数据源 + 位置
）。假设数据有效性的列表在B2：B7， 并命名为list
将下面的代码放在表下面。 下面例子只监控A列， 请按照你的需要改这一行： Set isect = Intersect(Target, Me.Range(
"A:A"
))如下面截图， 每次通过数据有效性输入选择，选项会自动变成公式。
把B2输出单元格的a改成god， 由于A列之前的数值都是公式输出，所以以前的a全部也变成god。
