- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 导入Excel的图片 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=196373)
-- 发布时间：2025/4/21 23:15:00
-- 导入Excel的图片
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:文件导入.table |
老师，您好，请问可以导入Excel的图片到foxtable的列表里面吗？
像这样，感谢 感谢
-- 发布时间：2025/4/21 23:37:00
--
参考：http://www.foxtable.com/webhelp/topics/2492.htm
-- 发布时间：2025/4/22 8:42:00
--
Dim fl As String = ProjectPath & "Attachments\\" & dr("文件名") & ".jpg"
If Sheet(4, 4).SaveImage(fl) Then \'如果照片保存成功
dr("文件照片") = fileSys.GetName(fl)
End If
End If
因为这个Excel也是其他软件导出的，没有单独的图片文件
感谢 感谢
-- 发布时间：2025/4/22 8:49:00
--
If Sheet(图片所在的行数, 图片所在的列数).SaveImage(图片保存的路径) Then \'如果照片保存成功
[此贴子已经被作者于2025/4/22 8:49:13编辑过]
-- 发布时间：2025/4/22 9:53:00
--
老师们 可以在帮忙看看吗 还是没有倒出图片到路径，也没有导入到foxtable 麻烦您了
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:文件导入.table |
-- 发布时间：2025/4/22 10:08:00
--
1、没有指定保存的文件名称
2、图片在第一列，不是第2 列
Dim fl As String = dr("路径") & "这里需要指定图片名称.jpg" \'获取Excel表格图片到文件夹’
If Sheet(n, 0).SaveImage(fl) Then \'如果照片保存成功
-- 发布时间：2025/4/22 11:38:00
--
老师 能再帮忙看看吗？还是不能把Excel第一列的图片导入到路径列对应的文件，也没有输入到foxtable的第一列显示，麻烦您 感谢 感谢
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:文件导入.table |
-- 发布时间：2025/4/22 13:25:00
--
Dim fl As String = sheet(n, 5).Text & sheet(n, 1).Text & ".jpg"
-- 发布时间：2025/4/22 16:44:00
--
老师 我写了N+1，为什么前面还有有一行空的呢？感谢 感谢 ，我感觉是这个原因才导致没有导入到图片。
-- 发布时间：2025/4/22 17:15:00
--
代码？