- word幻灯片制作教程:word2019的统计文档字数功能使用图解教程
- word教程零基础教程免费:怎样使Word2013保存时始终创建备份副本
- 电脑教程word入门:Word2007个人文档怎么加密
- word教程自学:word2013页码设置
数据处理的时候,想要提取不重复的值,在VBA中用对话框,就可以快速选取不重复值,下面我们就来看看详细的教程。
1、在工作表中,点击菜单栏【开发工具】,word怎么删除空白页,在其工具栏内,点击【visual basic】!
2、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!
3、会弹出模块编辑窗口!
4、在模块窗口输入以下代码:
Sub 窗口筛选重复值() Dim d As Object Set d = CreateObject("scripting.dictionary") qy = Application.InputBox("", "选择要进行不重复筛选的区域", , , , , , 8) For Each cf In qy d(cf) = "" Next Set ff = Application.InputBox("", "要放置的区域", , , , , , 8) ff.Resize(d.Count) = Application.Transpose(d.keys) End Sub
5、点按键盘上的F8,一步步运行编写的代码!同时可以检查代码是否正确!
6、弹出选择区域对话框,选择想要筛选的区域!
7、右击【确定】,继续运行代码,pdf转换成word,pdf转word,会弹出第二个对话框!
8、选择要放置不重复值的区域,继续运行代码,不重复值会被选取出来!
以上就是VBA使用对话框快速选取不重复值的教程,希望大家喜欢,请继续关注脚本之家。
visualbasic怎么编写单元格偏移代码?
vb6.0怎么生成exe程序实现返回参数功能?
VBA怎么快速从两个表格提取符合条件的数据?
上一篇:word制作表格教程基础入门:VBA怎么使用对话框快速选取不重复值? 下一篇:word基础教学教程完整版:水晶报表软件 SAP Crystal Reports 2016安装注册激活教程(附产品密钥)
郑重声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。