VBA怎么判定数据重复录入

 时间:2024-10-12 02:32:33

1、第一,新建一个空白EXCEL2003版的文档,然后点击视图——工具栏——窗体,方便使用命令按钮来操作宏。

VBA怎么判定数据重复录入

3、第三,重命名命令按钮。为了方便操作,命令按钮以它的用途来命名,点击命令按钮的文字框——删除骒貉缭塄原有的文字——输入:判定重复数据。这样就重新命名好了。

VBA怎么判定数据重复录入

5、第五,在代码编辑窗口那里,可以更sub开头的宏名称,修改容易明白是什么用途的宏,也可以不用彭榧逡钚修改——然后在中间那里输入如下代码:肛舀辨乔Dimarr,brr()DimIAsInteger,jAsIntegerDimDictAsObjectOnErrorResumeNextSetDict=CreateObject("scripting.dictionary")WithActiveSheetarr=Intersect(.UsedRange,.Columns(1))ForI=1ToUBound(arr)IfDict.exists(arr(I,1))ThenDict.Item(arr(I,1))=Dict.Item(arr(I,1))+1ElseDict.Item(arr(I,1))=1EndIfNextIForI=1ToUBound(arr)j=j+1ReDimPreservebrr(1Toj)brr(j)=IIf(Dict.Item(arr(I,1))=1,"唯一","重复")NextI.Columns(2).ClearContents.Range("b1").Resize(UBound(brr),1)=WorksheetFunction.Transpose(brr)EndWith

VBA怎么判定数据重复录入
  • 怎样使用VBA工作表激活事件的运用?
  • 如何使用VBA删除表格中所有空白列
  • Excel如何利用VBA提取全部工作表名?
  • excel中使用vba提取所有工作薄名称的方法
  • Excel中如何利用VBA查找工作表
  • 热门搜索
    残保金如何计算 婷美化妆品怎么样 儿童荨麻疹怎么治疗 扬子地板质量怎么样 如何看掌纹 如何饮食减肥 工作计划怎么写范文 生活中的一朵浪花 如何看风水 如何制作游戏软件