如何在EXCEL里制作搜索引擎 谢谢大师
一、制作方法： 在插入一个工作表,选择"视图"--"工具拦"--"控件工具箱",插入个命令按扭,双击,输入如下代码:Private Sub CommandButton1_Click() On Error GoTo 0 Application.EnableEvents = False '可选 [a7].CurrentRegion.Clear Sheets("基础表").Range("A1:L" & Sheets("基础表").[a1].CurrentRegion.Rows.Count). _ AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range("C3:L4"), _ CopyToRange:=Range("A7"), Unique:=False r = Range("a7").End(xlDown).Cells(2, 1).Row MsgBox "符合您查询条件的产品共有" & r - 8 & "个!", vbOKOnly + 64, "提示" End Sub 其中"基础表"就是你存放数据的表名, 下来设置查询条件: 在新建的表,如在第三行依次写入与基础表相同的栏目名,如工厂,产品..... 在第四行留空,用数据有效性作成下拉选择条件框. 然后选择数据插入点,如上面代码的a7,(必须在条件栏下留一个空行),可以输入A6,A7...,但绝对不能是A5,然后选择条件查询就可以了,支持模糊查询. 上面代码显示的A1:L为数据存储区件,必须包含你的工厂,产品.....那一行, C3:L4为条件区间 二、EXCEL的使用技巧： 1、右键单击窗口下面的工作表标签，如“Sheet1”.在弹出的菜单中选择“选定全部工作表” 2、如何快速删除单元格信息， 有一排数据，想快速删除这组数据，可以使用“填充删除法”。选中该列空白单元格，将鼠标移至该单元格右下方，鼠标变成黑色十字后，向上拖动填充。整组数列填充空白完成，等于删除了整组数列。 3、excel对每个单元格都有默认的命名方式，即字母+数字，如A7，表示第一列的第七排单元格。如果想按照我们自己的想法去重新命名一个单元格，如，将B7改为“我的单元格”，则首先点击该单元格，，选中左上角的名字，修改为“我的单元格” 4、想快速查看一列或者排的和，可以单击这拍最后一个有数字的单元格，网上拖动全部选择，excel会自动显示选择的这列的。 5、单元格内的数据有批注，格式，内容等等，但是只想要单纯的数字，不需要其他东西时，可以选中该单元格，点编辑——清除，可以选择清除格式，内容，批注，或者全部东西都删除。 6、选中不相邻的单元格，可以先按住ctrl，再进行点击选择。
标签：EXCEL,搜索引擎,大师
