Foxtable(狐表)用户栏目专家坐堂 → [求助]在导入EXCEL表数据的时候,如何不让列为空的数据导入


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

主题:[求助]在导入EXCEL表数据的时候,如何不让列为空的数据导入

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/21 23:27:00 [显示全部帖子]

datacolchanged事件的代码改一下

 

Dim dr As DataRow
dr = DataTables("设置").DataRows(0)
If e.DataCol.name = "班主任" Then
    If e.DataRow("班主任") = nothing Then
        e.DataRow("班主任") = dr("班主任")
    End If
End If

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/22 8:46:00 [显示全部帖子]

 上传测试例子测试。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/22 12:29:00 [显示全部帖子]

导入后,重置列

 

DataTables("系统表").datacols("学号").RaiseDataColChanged("素质导师 is null")


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/22 14:41:00 [显示全部帖子]

直接执行7楼代码,不需要像8楼那样写。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/22 15:53:00 [显示全部帖子]

以下是引用jjjeyes在2017/9/22 14:48:00的发言:
因为我是有多列值为空时,任意一列没有值就重置列

 

直接写7楼代码即可,判断是否为空,在datacolchanged事件里面判断。


 回到顶部