查看: 1042|回复: 3
直接看图吧新人求助了
火车车厢 节
本帖子中包含更多资源
才可以下载或查看，没有帐号？
火车车厢 节
火车车厢 节
这个替换我会了，可是新问题来了 ，以前都是网址里面的数字一样，现在上面网址的数字和下面网址的数字不一样了哦 ，怎么处理
火车车厢 节
这种就是用替换就行。用正则替换
温馨提示：建议您联系官方定制服务，通过官方支付方式完成支付。您与其他非官方账号发生的交易，我方概不承担责任。网络有风险，交易需谨慎
Copyright &
&Template by
All Rights Reserved.
Powered by查看: 411|回复: 16
新人求助最简单的编号对应图片问题
阅读权限10
在线时间 小时
看了好多，都是VBA，根本看不懂，大神给出的代码貌似都是固定单元格的？我修改VBA里的单元格编号也不起作用，完全看不懂代码里的常量和变量，我只会普通的单元格之间的加减乘除。现在想要A1输入0001，B1就出现这个表格里pic文件夹对应名称的图片。但如果要把A1 B1移位到C2 F2这样，应该是改哪些参数？还有这个代码不能整列或者整行运行吗？
阅读权限10
在线时间 小时
本帖最后由
15:55 编辑
Private Sub Worksheet_Change(ByVal Target As Range)
& & Dim FillPath As String
& & If Target.Address && &$A$5& Then Exit Sub
& & FillPath = ThisWorkbook.Path & &\pic\& & Range(&a5&).Value & &.jpg&
& & With Sheets(&sheet1&).Shapes(&矩形 1&)
& && &&&If Dir(FillPath) && && Then
& && && && &.Fill.Visible = msoTrue
& && && && &.Fill.UserPicture FillPath
& && &&&Else
& && && && &MsgBox &没有照片&
& && && && &.Fill.Visible = msoFalse
& && &&&End If
& & End With
比如这个代码，我在论坛下载到的，请问哪一个是坐标代码啊？怎么看和改动代码，看不懂哪一个是常量变量单元格。。。我要把对应的参数移动和复制到其他单元格去...
阅读权限95
在线时间 小时
不知道你是要做什么，如果是批量插入图片，这是可以做到的
如果只是为了打印，不必插入那么多再打印，程序可以做到：自动一边插入图片，一边打印的
你若想解决问题，最好弄个表，写明要求，附上一点照片，方便调试
阅读权限10
在线时间 小时
不知道你是要做什么，如果是批量插入图片，这是可以做到的
如果只是为了打印，不必插入那么多再打印，程序 ...
不是很懂，就是想在一个表格里输入一个编号，对应的出来一张图片，比如A2输入001，B2出来编号001.jpg的图片，图库里存了几千编号张照片手动插入难度太大了。。。。
阅读权限95
在线时间 小时
表中插入那么多图片，如何打得开呢
阅读权限95
在线时间 小时
不知你插入那么多图片后，做什么用？
阅读权限10
在线时间 小时
不知你插入那么多图片后，做什么用？
不是一次性插入很多图，而是在excel同文件夹有几千张图，excel里输入图片名称就能对应调出这张图片，表格里最多也就出现几张图片而已拉。是打印下单用的
阅读权限50
在线时间 小时
楼主这是批量在指定单元格插入图片，其实并不难。批量插入图片，用工作表事件不太适合。建议还是上传个附件。
阅读权限10
在线时间 小时
不知你插入那么多图片后，做什么用？
大神，附件做好了，帮忙看看~
09:44 上传
点击文件名下载附件
86.94 KB, 下载次数: 9
阅读权限50
在线时间 小时
附件中插入图片的单元格位置并没说明啊。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师