Foxtable(狐表)用户栏目专家坐堂 → 单元格内填充图片


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

主题:单元格内填充图片

帅哥哟,离线,有人找我吗?
fendouww
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
单元格内填充图片  发帖心情 Post By:2019/8/22 8:38:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

我想在单元格内填 充图片展示,可以做到吗?如何做?效果同excel内

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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


 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
单元格内填充图片  发帖心情 Post By:2019/8/22 13:06:00 [只看该作者]

我要的是这样填充图片的
图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/22 13:46:00 [只看该作者]

同样的用法,不会就上传实例

 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
单元格内填充图片  发帖心情 Post By:2019/8/22 14:04:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:3.jpg
图片点击可在新窗口打开查看
图片显示在单元格内,请教做法
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:1.rar


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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/22 14:20:00 [只看该作者]

drawcell事件

If e.Col.Name = "第二列" Then
    If FileSys.FileExists(ProjectPath & "Attachments\" & e.Row("第二列")) Then
        e.Graphics.DrawImage(getImage(ProjectPath & "Attachments\" & e.Row("第二列")),e.x +1,e.y+1,e.Width - 2,e.Height - 2)
        e.Text = ""
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
单元格内填充图片  发帖心情 Post By:2019/8/22 14:22:00 [只看该作者]

很感谢

 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
  发帖心情 Post By:2019/8/29 13:28:00 [只看该作者]

我使用了远程存储后就不再绘制了是什么原因,图片不填充了
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/29 14:27:00 [只看该作者]

单元格存储的是什么内容?

drawcell事件

If e.Col.Name = "第二列" Then
    If FileSys.FileExists(e.Col.DataCol.DefaultFolder & "\" & e.Row("第二列")) Then
        e.Graphics.DrawImage(getImage(e.Col.DataCol.DefaultFolder & "\" & e.Row("第二列")),e.x +1,e.y+1,e.Width - 2,e.Height - 2)
        e.Text = ""
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
fendouww
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2519 威望:0 精华:0 注册:2019/7/19 13:09:00
  发帖心情 Post By:2019/9/3 8:37:00 [只看该作者]

现在功能已经做好了,但绘图后表格会很卡,有解决办法吗?
我看别的软件转换图片后并不会这么卡的
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

 回到顶部
总数 18 1 2 下一页