禁止直接输入不在列表项目中的内容
DataColChanging
Tables("任务单").Cols("采购员").AllowDirectType = False
测试发现,当我进入系统后,第一次在单元格内还是能直接输入,输入一次后,才能正式生效。