Excel 怎么将一个日期输入后,可以查出当天的记录?

比如我输入今天的日期,那今天所有我之前填写好的记录按照相对应的格式显示出来?

上图就是填入日期,可以显示出这一天内所有顾客的访问记录

对应的就是这样的表,事先填好。
可以联系Q.303799912 或者邮.箱都可以

有谁会用VLOOKUP解决这个问题的吗?

用vlookup函数只能返回第一条记录,如果这一天有多条记录的话,不能满足要求。得用VBA解决。先打开工作表,按下Alt+F11键打开VBE编辑器,插入一个模块,粘贴以下代码。然后关闭vbe编辑器,返回工作表,单击视图→工具→窗体→插入一个命令按钮→指定宏为test→每次在D1输入日期后,按钮1就行。

Sub test()
Sheet2.Rows("3:100").ClearContents
Dim x As Integer, y As Integer
For x = 2 To Sheet1.Range("a65536").End(xlUp).Row
 y = Sheet2.Range("a65536").End(xlUp).Row + 1
 If Application.WorksheetFunction.CountIf(Sheet1.Columns(1), Sheet2.Range("d1")) = 0 Then
   MsgBox "该日期没有数据"
   Exit Sub
 End If
 If Sheet1.Range("a" & x).Value = Sheet2.Range("d1") Then
   Sheet2.Range("a" & y) = Sheet1.Range("b" & x)
   Sheet2.Range("b" & y) = Sheet1.Range("c" & x)
   Sheet2.Range("c" & y) = Sheet1.Range("d" & x)
   Sheet2.Range("d" & y) = Sheet1.Range("e" & x)
 End If
Next x
End Sub

 效果如图

这里只是一个例子,有需要传个文件帮你看看。[email protected]

温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-10-13

可以使用VBA,以下是示例代码:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Row = 1 And Target.Column = 12 Then
        Range("B4:L19").ClearContents
        MaxRow = Sheet3.Cells(Rows.Count, 2).End(xlUp).Row
        CurRow = 4
        For i = 2 To MaxRow
            If InStr(Sheet3.Cells(i, 2).Value, Cells(1, 12).Value) > 0 Then
                Cells(CurRow, 2).Value = Sheet3.Cells(i, 3).Value '姓名
                CurRow = CurRow + 1
            End If
        Next
    End If
End Sub


示例结果图:




附件:



追问

我还真没到那个级别,之前就有人用VLOOKUP帮我做了一部分,能用这个解决方法解决吗?

本回答被提问者和网友采纳
第2个回答  2015-10-03
Excel 怎么将一个日期输入后,可以查出当天的记录的解决方法如下:
1、可以用筛选功能,
2、打开要处理的文档,
3、点击数据,自动筛选
4、在筛选那里找到要筛选的字段,并输你要查找的日期
5、结果就是你需要的内容了。
第3个回答  2014-10-13
你这个需求实际上就是查询功能,如果你会一点编程,可以用VBA编程实现。另外,我看到你在管理客户回访?考虑使用华创客户关系管理系统吗,能管理客户、产品、订单、回访所有相关记录,使得信息既互通,又有适当的权限控制。至于查询,就更没问题了,可按任意条件查询,支持模糊查询。
该软件还具有具有来电弹屏、通话录音功能,能自动记录每次电话的通话时间、通话长度、电话号码,并自动录音,且将录音文件自动上传至系统。借助通话日志与录音,您可完整了解客户沟通过程,洞察客户意向。通过调阅电话通话记录数据表,您也可完整了解业务员每次的服务情况。追问

我们这刚开始,以后需要会联系你

追答

好的,如觉得我写的有点用,望采纳,谢谢!

第4个回答  2014-10-13
你好这两张是在一张表中是:
你可以用刷选就行了追问

筛选是可以,我知道,但是达不到我的要求。

其实就是把筛选的结果对应到表,这就是我的要求。

相似回答