以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于导出  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=148879)

--  作者:hnguang
--  发布时间:2020/4/17 13:27:00
--  关于导出
麻烦请问一下,有方法可以直接导出红色字体部份的吗

图片点击可在新窗口打开查看此主题相关图片如下:2-2.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/4/17 14:11:00
--  
红色字体部分是怎么设置的?
--  作者:hnguang
--  发布时间:2020/4/17 14:18:00
--  
 直接在按纽事件里面写的


--  作者:有点蓝
--  发布时间:2020/4/17 14:24:00
--  
什么代码,发上来
--  作者:hnguang
--  发布时间:2020/4/17 14:33:00
--  
      If  (r1("上班1")="" Or r1("下班1")="" Or r1("上班2")="" Or r1("下班2")="") And r1("請假")<=0 Then
                    r1.ForeColor =Color.red
                End If


--  作者:有点蓝
--  发布时间:2020/4/17 14:39:00
--  
这种没有办法筛选。添加一个辅助列,比如红色记1,绿色记2等等,然后通过辅助列筛选后导出
--  作者:hnguang
--  发布时间:2020/4/17 14:41:00
--  
ok,感谢
--  作者:有点蓝
--  发布时间:2020/4/17 14:45:00
--  
可以这样筛选:

tables("表A").filter = “(上班1 is null Or下班1 is null Or 上班2 is null Or 下班2 is null ) and 請假 <= 0