你可以设置两列，假如是D列和E列，D列使用数据的有效性，方法如下：
菜单“数据”“有效性”在有效性对话框中选择“设置”选项卡，“允许”选择“序列”，在出现的数据源中输入“满意,不满意”(逗号应为英文半角格式)。
然后设置E列：
1、全部选中
2、输入“=if(d1="满意",0,1)”，按ctrl+enter键
3、隐藏E列，选中E列后右键快捷菜单中选择隐藏即可，使用时在该处右键选择取消隐藏
我不太会VBA,但我有一个笨办法：在设置下拉选择框的左边加一个辅助列，在此列中写入公式：=if( 后一列对应单元格 ="满意","0","1")，将下拉选择框这列进行单元格设置---对齐---缩小字体填充---确定，再将此列无限变窄，只要能点击出现下拉框为止，一样可以达到你的目的！
设个数据有效性
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024