EXCEL VBA如何实现多条件查询功能

2024-12-16 06:16:27

推荐回答（3个）

回答1：

Private Function GetQryCDT() As String      '获取界面条件
    
    If Not IsNull(dtpEndDate.value) Then GetQryCDT = GetQryCDT & " and [FEndDate] <='" & dtpEndDate.value & "'"   '日期型空间
    
    If Trim(txtBarCode.Text) <> "" Then GetQryCDT = GetQryCDT & " and [FBarCode] like '%" & txtBarCode.Text & "%'" '文本控件
    
    If chkState.Item(0).value = Unchecked Then GetQryCDT = GetQryCDT & " And FBillState<2"  '多选项控件
End Function

回答2：

vba筛选帮助实现

回答3：

你直接筛选不能实现吗？