如何实现限制一列表格中只能输入数据，且相同数据不超过三个。
工具/原料
微软OFFICE，Excel
电脑
方法/步骤
1、在工作表标签上右击，选择查看代码，或按Alt+F11
2、进入VBE编辑界面，点击插入-->模块
3、在新建的模块中输入代码PrivateSubWorksheet_Change(B鲻戟缒男yValTargetAsRange)Col="帆歌达缒A"'把A列修改为限制列，此处为A列isMatch=0tVal=Target.ValueIfTarget.Count=1ThenIfTarget.Column=1AndtVal<>""ThenIfIsNumeric(tVal)=FalseThenMsgBox"请输入数字"Target.Value=""Target.SelectEndIfFori=1ToCells(65536,Col).End(xlUp).RowIfCells(i,Col)=tValThenisMatch=isMatch+1NextIfisMatch>3ThenMsgBox"数据重复超过3个，请重新输入"Target.Value=""Target.SelectEndIfEndIfEndIfEndSub
4、如果在A列输入非数值内容，则会弹出提示"请输入数字"。
5、如果在A列输入相同数据超过三个，则会弹出提示"数据重复超过3个，请重新输入"。
