Foxtable(狐表)用户栏目专家坐堂 → 单元格空白提示


  共有2320人关注过本帖树形打印复制链接

主题:单元格空白提示

美女呀,在线,快来找我吧!
13775189031
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:826 积分:5743 威望:0 精华:0 注册:2017/12/19 14:46:00
单元格空白提示  发帖心情 Post By:2018/8/3 15:07:00 [只看该作者]

请教:
表A中某列不能有空白,必须填写数据,并在关闭项目前提示!
怎么实现?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/3 18:12:00 [只看该作者]

beforeCloseProject事件

 

If DataTables("表A").Find("第一列 is null ") IsNot Nothing Then
    msgbox(123)
    e.cancel = True
End If


 回到顶部
美女呀,在线,快来找我吧!
13775189031
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:826 积分:5743 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2018/8/4 9:59:00 [只看该作者]

OK!谢谢!


 回到顶部
美女呀,在线,快来找我吧!
13775189031
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:826 积分:5743 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2018/8/10 13:48:00 [只看该作者]

如果想整行内容都不能有空白呢?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/10 15:15:00 [只看该作者]

以下是引用13775189031在2018/8/10 13:48:00的发言:

如果想整行内容都不能有空白呢?

 

If DataTables("表A").Find("第一列 is null or 第二列 is null or 第三列 is null") IsNot Nothing Then
    msgbox(123)
    e.cancel = True
End If


 回到顶部
美女呀,在线,快来找我吧!
13775189031
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:826 积分:5743 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2018/8/13 13:19:00 [只看该作者]

如果想在生成报表之前提示不能有空白单元格,要用那个事件?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/13 15:27:00 [只看该作者]

以下是引用13775189031在2018/8/13 13:19:00的发言:

如果想在生成报表之前提示不能有空白单元格,要用那个事件?

 

如果是excel报表,参考

 

http://www.foxtable.com/webhelp/scr/1953.htm

 

 


 回到顶部
美女呀,在线,快来找我吧!
13775189031
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:826 积分:5743 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2018/8/16 14:51:00 [只看该作者]

Select e.Book.TempLate
    Case "目视检验报告"
        Select Case e.Book.CurrentSheetName
            Case "VT报告"
                If DataTables("VT报告").Find("仪器设备_设备1 Is null Or 仪器设备_设备2 Is null Or 仪器设备_设备3 Is null") IsNot Nothing Then
                    msgbox("不能有空值!")
                    e.cancel = True
                End If
        End Select

 

是在word报表里,该怎么改?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/16 15:04:00 [只看该作者]

word报表无法编写事件。你做一个按钮,生成word报表吧。

 

http://www.foxtable.com/webhelp/scr/2890.htm

 


 回到顶部