Question

我的问题是关于：Excel VBA表单中的Month View Control 6.0日期选择器，可用于在记录日期之间进行过滤。当我选择特定的日期即。 2016年4月6日至2016年5月16日，它将不包括16日的记录，而仅包括6日和16日之前的记录集，而不是16日的记录集。我如何才能将该日期（16日）包括在内无需去16号以后的约会。我希望我有道理。

这是我的代码：

Private Sub btnStDateCal_Click()
    Cal2.lblCtrlName = "tbStDate"
    Cal2.lblUF = "frmfilter"
    Cal2.Show
End Sub

Private Sub fCal_DateClick(ByVal DateClicked As Date)
For Each Uf In VBA.UserForms
If Uf.Name = Cal2.lblUF Then
    For Each ctl In Uf.Controls
        If ctl.Name = Cal2.lblCtrlName Then
                'found the control to give the date to
            ctl.Value = DateClicked
            Me.Hide
            Exit Sub
        End If
    Next ctl
  End If
End Sub

 Private Sub btnEndDateCal_Click()
        Cal3.lblCtrlName = "tbEndDate"
        Cal3.lblUF = "frmfilter"
        Cal3.Show
  End Sub

Private Sub Cal_DateClick(ByVal DateClicked As Date)
For Each Uf In VBA.UserForms
If Uf.Name = Cal.lblUF Then
    For Each ctl In Uf.Controls
        If ctl.Name = Cal.lblCtrlName Then
            'found the control to give the date to
            ctl.Value = DateClicked
            Me.Hide
        End If
      Next ctl
    End If

结束子

选择两个日期的确切记录

0 个答案: