- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 空白行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55189)
-- 发布时间：2014/8/12 14:33:00
-- 空白行
此主题相关图片如下：qq截图20140812143202.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
Excel这种选择空白的时候 某一列的空白行 能选出来 在狐表中能不能实现？
-- 发布时间：2014/8/12 14:39:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |
-- 发布时间：2014/8/12 14:41:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |
-- 发布时间：2014/8/12 14:43:00
--
此主题相关图片如下：qq截图20140812144352.png
如果某一列某一行内容是空白的话别的列都有数据，怎么筛选不出来呢？已回单列为例
-- 发布时间：2014/8/12 14:45:00
--
2楼例子测试没问题
此主题相关图片如下：qq截图20140812144445.png
-- 发布时间：2014/8/13 13:51:00
--
此主题相关图片如下：qq截图20140813135953.png
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1(3)(1).table |
同时按空值查询数据出不来
-- 发布时间：2014/8/13 14:01:00
--
Dim Filter As String = "1=1"
With e.Form.Controls("托运")
If .Value IsNot Nothing Then
If .Value <> "(空白)" Then
Filter = Filter & " and 托运单位 = \'" & .Value & "\'"
Else
Filter = Filter & " and (托运单位 is null or 托运单位 = \'\')"
End If
End If
End With
With e.Form.Controls("回单")
If .Value IsNot Nothing Then
If .Value <> "(空白)" Then
Filter = Filter & " and 回单 = \'" & .Value & "\'"
Else
Filter = Filter & " and (回单 is null or 回单 = \'\')"
End If
End If
End With
If Filter >= "" Then
Tables("应付应收录入").Filter = Filter
End If