Foxtable(狐表) → 用户栏目 → 专家坐堂 → ECXEL打印问题


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

主题：ECXEL打印问题
帅哥哟，离线，有人找我吗？
扶风
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：481 积分：3258 威望：0 精华：0 注册：2015/6/2 8:33:00 		ECXEL打印问题  发帖心情 Post By：2016/10/13 18:45:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.zip

老师点击品质检测--测试窗口--“生成检验报告”一直跳出”表单名称必须唯一。”之前还是好的，修改了模板1后我又改回原样还是报错。
还有模板1第17行样本编号那一行，我希望能显示10行，如何做到，之前测试是只显示1行，但有10个报表。所有数据都在导出表里，请问如何修改？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/10/13 20:38:00 [只看该作者]

把模板中另外一个空的sheet删除即可

 回到顶部
帅哥哟，离线，有人找我吗？
扶风
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：481 积分：3258 威望：0 精华：0 注册：2015/6/2 8:33:00 		  发帖心情 Post By：2016/10/17 17:55:00 [只看该作者]

Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("待测试项目_Table1").FindRow("项目编号 = '" & dr("项目编号") & "'")
'Dim wz As String = Tables("SQL_wdjbxxb").FindRow("id = '" & dr("序号") & "'", "wdmc = '" & dr("文档名称") & "'")
 If wz >=0 Then
  Tables("项目测试数据看板").Position = wz     '(后台数据表)
  Tables("待测试项目_Table1").Position = wz
 End If

老师，现在前台table行和后台是一致的，所以这么写是对的，但如果前台少了一行，后台没变，这么写位置就错开不对了？
那能否直接根据项目编号来定位到后台的所在行？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/10/17 18:04:00 [只看该作者]

后台是指什么？如果是主表那没有问题。如果是指没有加载的数据没有办法

 回到顶部
帅哥哟，离线，有人找我吗？
扶风
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：481 积分：3258 威望：0 精华：0 注册：2015/6/2 8:33:00 		  发帖心情 Post By：2016/10/17 18:20:00 [只看该作者]

窗口的待测试项目_Table1 绑定着 项目测试数据看板，如果都不变的话，位置是一一对应的，但是如果 待测试项目_Table1少了一行，位置就对不上了，能否直接根据待测试项目_Table1的项目编号 定位到 项目测试数据看板 的项目编号那一行？

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


加好友 发短信
等级：超级版主 帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/10/17 20:55:00 [只看该作者]

可以的，参考：http://www.foxtable.com/webhelp/scr/2631.htm
 回到顶部
帅哥哟，离线，有人找我吗？
扶风
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：481 积分：3258 威望：0 精华：0 注册：2015/6/2 8:33:00 		  发帖心情 Post By：2016/10/18 14:54:00 [只看该作者]

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2016.3.23.1
错误所在事件：结案临时表,CurrentChanged
详细错误信息：
未将对象引用设置到对象的实例。


Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("项目测试数据看板").FindRow("项目编号 = '" & dr("项目编号") & "'")
 If wz >=0 Then
  Tables("项目测试数据看板").Position = wz
 End If

老师，我点运行它一直报这个错，但是X掉后还是正常运行，请问如何解决？
品质检测 结案项目 运行窗口
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目5.zip
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/10/18 15:41:00 [只看该作者]

Dim dr As Row = e.Table.Current
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("结案临时表").FindRow("项目编号 = '" & dr("项目编号") & "'")
    If wz >=0 Then
        Tables("结案临时表").Position = wz
    End If
End If
 回到顶部
帅哥哟，离线，有人找我吗？
扶风
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：481 积分：3258 威望：0 精华：0 注册：2015/6/2 8:33:00 		  发帖心情 Post By：2016/10/21 18:02:00 [只看该作者]


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

老师这是做在excel里的，L的值全取的程序表里的[L]，下面那个空格能自己做判断吗？如果上面的值都是/，那么空格里也显示/，否则就像其他一样显示 合格，请问如何实现？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

<IIF([L]="/", [L], "合格" & chr(10) & chr(13) & "Passed")>
 回到顶部
总数 27 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.10156 秒, 6 次数据查询