Question

我有一张Excel表格，其中包含日期，时间和其他数字等数据。

我想要做的是创建一个宏，然后选择落在特定时间范围内的所有数据。

例如，我将有一个变量start_time = 8 AM和end_time = 10 AM。

因此，我需要选择属于该时间范围的所有列。

Answer 1

   strdate = Application.InputBox(Prompt:="Enter a Date to Locate on This Worksheet", _
            Title:="DATE FIND", Default:=Format(Date, "Short Date"), Type:=1)
   If strdate = "False" Then Exit Sub
       strdate = Format(strdate, "Short Date")
       On Error Resume Next
           Set rCell = Cells.Find(What:=CDate(strdate), After:=Range("A1"),           LookIn:=xlFormulas _
               , LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext,               MatchCase:=False)

On Error GoTo 0

同样获取第二个日期的下一个范围，并将范围设置为变量RANGE.SELECT

根据值从Excel中选择数据

1 个答案: