本篇文章给大家谈谈excel宏录制筛选,以及excel宏如何录制与调用对应的知识点,希望对各位有所帮助,不要忘了收藏本站喔。
本文目录:
- 1、怎么利用EXCEl的宏进行筛选
- 2、EXCEL怎么录制宏
- 3、excel 录制宏做一个筛选 怎么总是错的?
- 4、excel宏命令(条件筛选)
- 5、excel如何录制同步筛选的宏
- 6、excel如果想录制一个宏 实现自动筛选 怎么操作?
怎么利用EXCEl的宏进行筛选
在你数据当前的左下角sheet 鼠标右键 点击最后一个 查看代码 把下面的代码复制到里面
使用的时候 03版是 菜单 工具----宏---宏---找到test的宏执行 即可
Sub test()
Application.ScreenUpdating = False
Dim rng As Range
Dim r1, i As Long
Dim findvalue As Range
r1 = ActiveSheet.Range("B65536").End(xlUp).Row
i = 1
For Each rng In ActiveSheet.Range("B1:B" r1)
Set findvalue = ActiveSheet.Columns(1).Find(what:=rng.Value)
If Not findvalue Is Nothing Then
Cells(i, 3).Value = rng.Value
i = i + 1
End If
Next
Application.ScreenUpdating = True
End Sub
EXCEL怎么录制宏
excel2010具有录制宏功能,具体操作如下:
一、使用工具:excel2010
二、操作步骤:
1、打开excel2010文档,点击“开发工具”中的“录制宏”,如图:
2、输入宏名称,然后按“确定”按钮开始进行宏录制,如图:
3、开始操作需要录制的步骤,例如设置单元格格式,如图:
4、操作完成后点击“开发工具”中的“停止录制”按钮,如图:
5、如果需要执行或编辑宏可以点击“开发工具”中的“宏”按钮,如图:
6、这时就可以执行或编辑删除宏,如图:
excel 录制宏做一个筛选 怎么总是错的?
Sub 筛选()
Dim I
For I = 1 To Range("A65536").End(xlUp).Row
If Cells(I, "a") 1 Then
Rows(I).Select
Selection.EntireRow.Hidden = True
End If
Next
End Sub
excel宏命令(条件筛选)
开发工具——宏——编辑宏——输入代码如下——运行宏,结果筛选出A列数据中的大于5的数值,如图:
excel如何录制同步筛选的宏
先录制宏,然后在高级筛选中将其复制到其他位置,最后拖到工作表里录入即可。
举个例子:有一张工资表,里面记录了成百上千的职工工资情况,如何通过输入姓名或者工号就能查询出对应的各种职工信息呢,并且,其他的职工信息不会显露出
来,因为经常有职工来问询工资、加班费、社保等情况,帮他们查询时,只显示他本人的信息,其他人的信息需要被隐藏,如何实现呢?这时,可以考虑通过
excel高级筛选功能,再录制一段宏来实现。具体如下:
第一步:打开工资表,点击工具》宏》录制新宏。
第二步:在工作表下方或者右边写上姓名,下面讲字段复制。接着,在工具栏中选择 数据-筛选-高级筛选。选中“将筛选结果复制到其他位置”,列表区域和条件区域的选择请看截图:
第三步:关闭录制宏按钮。在工具栏上点右键,选择“窗体”,选中命令按钮,拖到工作表空白区域,然后在弹出的选择宏中,选择录制的宏代码,确认即可。
最后,请看截图,可以在A14单元格输入姓名,点击确认按钮就可以查询了,同时将A1-A5隐藏即可。
excel如果想录制一个宏 实现自动筛选 怎么操作?
你的表格应该有表头,排序和筛选都各自可以用一个语句实现,如下的代码可以在不同规模的数据下工作(前提是必须有个表头在第一行、从A列开始):
Option Explicit
Sub X()
ActiveSheet.UsedRange.Sort key1:=Range("a2"), order1:=xlAscending, Header:=xlYes
ActiveSheet.UsedRange.AutoFilter field:=2, Criteria1:=Array("C06,", "C07")
End Sub
试验数据:
excel宏录制筛选的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于excel宏如何录制与调用、excel宏录制筛选的信息别忘了在本站进行查找喔。