Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口表导出excel数据不完整


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

主题:[求助]窗口表导出excel数据不完整

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


加好友 发短信
等级:幼狐 帖子:146 积分:1624 威望:0 精华:0 注册:2019/3/28 14:49:00
[求助]窗口表导出excel数据不完整  发帖心情 Post By:2022/8/25 9:02:00 [只看该作者]

图片点击可在新窗口打开查看
窗口表中新增2个临时列(铝箔料号,PET料号),通过绘制给新增的2个列进行赋值,从窗口表看都是有数据的,但是导出成excel表后这2个列就有的就是空白。

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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/25 9:09:00 [只看该作者]

不要在绘制里赋值。到datacolchanged事件,或者其它事件处理

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


加好友 发短信
等级:幼狐 帖子:146 积分:1624 威望:0 精华:0 注册:2019/3/28 14:49:00
  发帖心情 Post By:2022/8/25 10:31:00 [只看该作者]

Select Case e.DataCol.Name
    Case "AL厚度","铝箔宽幅"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("铝箔宽幅") Then
            Return
        Else
            dr("铝箔料号") = "01.31.01.0" & dr("AL厚度") & dr("铝箔宽幅")
        End If
End Select
这段代码放到 datacolchanged事件里,铝箔料号都是空白,也没有报错。这是啥问题。

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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/25 10:33:00 [只看该作者]

"AL厚度","铝箔宽幅"是表达式列?

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


加好友 发短信
等级:幼狐 帖子:146 积分:1624 威望:0 精华:0 注册:2019/3/28 14:49:00
  发帖心情 Post By:2022/8/25 10:44:00 [只看该作者]

不是表达式,都是数值。

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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/25 10:44:00 [只看该作者]

已有的数据重置一下列

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


加好友 发短信
等级:幼狐 帖子:146 积分:1624 威望:0 精华:0 注册:2019/3/28 14:49:00
  发帖心情 Post By:2022/8/25 11:16:00 [只看该作者]

根据条件筛选出数据,然后在窗口表增加的临时列,重置列之后,还是空白。


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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/25 11:28:00 [只看该作者]

请上传实例说明

 回到顶部