Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何在excel报表里面加上二维码


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

主题：如何在excel报表里面加上二维码
帅哥哟，离线，有人找我吗？
edisontsui
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		如何在excel报表里面加上二维码  发帖心情 Post By：2019/5/13 11:06:00 [显示全部帖子]

我需要在excel表格上加上二维码，请教如何才能做到这样呢？

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/13 13:55:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:铝巴送货单.zip


If CurrentTable.name = "铝巴送货单"
    Dim r As Row = CurrentTable.Rows(i)
        For i As Integer = 0 To r - 1
            dim bc1 = r("送货单号") & “,” & r("生产piao号一") 
            bc2 = bc1 & “,” & r("生产piao号一")
            bc2 = bc2 & “,” & r("生产piao号一")
        next
    Dim Bar As New BarCodeBuilder
    Bar.Symbology = Barpro.Symbology.QRcode
    Bar.Code = "bc2"
    Bar.BarWidth = 0.3
    Bar.BarHeight = 8
    Bar.SaveImage("c:\铝巴送货单.jpg")
end if

我的数据表资料如附页所示。我希望 bar code 的内容的格式是: “送货单号”,"生产piao号一"，"生产piao号一"，"生产piao号一"，"生产piao号一"，"生产piao号一"，"生产piao号一" ......
例如：L20190430-1，04309101632，04309101633，04309101830

上面是我写的，不会写了。需要你的帮忙。送货单号取第一行就可以了，如果"生产piao号一"是重复的，就取一个可以了。请教如何写代码? 谢谢。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/13 18:17:00 [显示全部帖子]

第一行 "送货单号='123'" 是什么意思，我看不明白。 

我执行之后，出现如下警告：

.NET Framework 版本：2.0.50727.8793
Foxtable 版本：2017.3.18.1
错误所在事件：Excel报表,AfterBuild
详细错误信息：
参数无效。

也就是说，4楼的代码没有生成包含二维码的图形档案，对吗？

我的 excel 报表里面引用二维码图形档案的格式为：[&&c:\铝巴送货单.jpg]
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/13 19:27:00 [显示全部帖子]

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


这是实例。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/14 11:05:00 [显示全部帖子]

我在上面的管理项目4里面测试。发现两个问题：
1. 我希望二维码里面的信息只包括我用筛选树筛选之后的那些数据行，你上面的代码是包含筛选前的所有数据行。要怎样修改代码？
2. 我希望将二维码限制在L3M7这个合并单元格内，而附页所示的报表结果却不符合要求。要怎么引用二维码图片？谢谢。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:铝巴送货单-格式二.rar
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/14 14:33:00 [显示全部帖子]

我的加密狗已经超过有效期间，不能使用2018/1/10以后的版本。而你发给我的管理项目版本过高，我无法打开。

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/14 14:35:00 [显示全部帖子]

或者将代码贴到这里？谢谢。

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/14 15:27:00 [显示全部帖子]

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

请看附页管理项目，报表出来的结果还是不对。我只筛选一个送货单的资料出来，但是二维码里面却还是包含两个送货单的资料。
 回到顶部
帅哥哟，离线，有人找我吗？
edisontsui
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/14 15:59:00 [显示全部帖子]

原来是Bar.SaveImage("c:\铝巴送货单.jpg") 不会产生图片档案出来。所以插入excel里面的图片一直都是以前的旧图片。我把旧的“铝巴送货单.jpg”删除掉，再执行报表列印，发现不会产生新的图片档案。为什么呢？

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


加好友 发短信
等级：七尾狐 帖子：1553 积分：10082 威望：0 精华：0 注册：2014/12/18 16:12:00 		  发帖心情 Post By：2019/5/15 13:39:00 [显示全部帖子]

用10楼的excel模板就没有问题了。谢谢。
还有一个疑问：我们的客户要用手机扫描出二维码的内容后观看。现在的"送货单号"和"生产piao号一"是一行连续过去的，为方便手机查看，可否将这些内容做成："送货单号"单独一行，从第二行开始是"生产piao号一"，每5个"生产piao号一"为一行（像下面的样子）：
L20180804-1,
08049101432,08049101830,08049101733,08049101731,08049101734,
08029201532,09019200931,09019200932,09019200933,09019200933,
09019201531,09019201532
谢谢。
 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05859 秒, 9 次数据查询