在处理数据的过程中,有时候忘记了那些数据处理了,那些数据未处理,本篇经验将通过一简单实例和大家分享【如何利用VBA代码快速筛选出剩余的数据?】
工具/原料
1
电脑一台
2
OFFICE办公软件
方法/步骤
1
实例【sheet5中A列的数据需要处理,处理完毕的数据在sheet6中,请将未处理的数据筛选出,置入sheet4工作表的A列?】
2
在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!
3
会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!
4
会弹出模块编辑窗口!
5
在代码编辑窗口输入以下代码:Sub 选出未处理的数值()Dim i%, j%, k%, a As Range, b As RangeSheets('sheet5').SelectFor i = 1 To Application.CountA(Range('a:a'))Set a = Cells(i, 1)Sheets('sheet6').Activate For j = 1 To [a1].CurrentRegion.Rows.Count Set b = Cells(j, 1) If a = b Then GoTo 100 End If Next Sheets('sheet5').Select k = k + 1 Cells(i, 1).copy Sheets('sheet7').Cells(k, 1)100:NextEnd Sub
6
在VBA窗口,点击【运行】按钮!或按F8键!
7
未处理的数据瞬间被列出了!