二维码中间加LOGO

蒋昊 · 发表于 2019-4-13 14:43

zpy2 发表于 2019-4-13 13:51
。。。。。。。。。。。

理想效果是这样的

zpy2 · 发表于 2019-4-13 14:55

蒋昊发表于 2019-4-13 14:43
理想效果是这样的

蒋昊 · 发表于 2019-4-13 14:55

yjh_27 发表于 2019-4-13 13:12
参见附件。

怎么一下子把所有图片都给删除了？能不能只删除二维码呀？

yjh_27 · 发表于 2019-4-13 15:16

蒋昊发表于 2019-4-13 14:55
怎么一下子把所有图片都给删除了？能不能只删除二维码呀？

模块1是只删除二维码
For Each x In ActiveSheet.DrawingObjects
If InStr(x.Name, "Picture") > 0 And x.Name <> "Picture 1" Then x.Delete
Next

蒋昊 · 发表于 2019-4-13 15:26

yjh_27 发表于 2019-4-13 15:16
模块1是只删除二维码
For Each x In ActiveSheet.DrawingObjects
If InStr(x.Name, "Picture") ...

搞定，谢谢哈

蒋昊 · 发表于 2019-4-13 19:13

zpy2 发表于 2019-4-13 14:55
http://5809c7f4.nat123.cc:15216/bsbm/pdo/eh2/a20/a2001/gd/import_commit.php
可以试试。。。

这个咋玩的呀？？？

lkqsmxw · 发表于 2019-4-13 19:26

本帖最后由 lkqsmxw 于 2019-4-13 21:48 编辑

做到了，但不一定符合你的要求。QRmake版

zpy2 · 发表于 2019-4-13 19:28

本帖最后由 zpy2 于 2019-4-13 19:33 编辑

蒋昊发表于 2019-4-13 19:13
这个咋玩的呀？？？

清空，从 xls 复制编号列到网页文本框，按提交。

lkqsmxw · 发表于 2019-4-13 22:14

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk

lkqsmxw · 发表于 2019-4-14 10:35

本帖最后由 lkqsmxw 于 2019-4-14 17:53 编辑

生成的二维码放在了　二维码集　文件夹中了
EXCEL版

		自动登录	找回密码
密码			免费注册

[求助] 二维码中间加LOGO