Foxtable(狐表)用户栏目专家坐堂 → 调用模板插入图片后的图片大小调整


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

主题:调用模板插入图片后的图片大小调整

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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
调用模板插入图片后的图片大小调整  发帖心情 Post By:2013/8/30 18:42:00 [显示全部帖子]

 

向论坛高手请教一个问题,我调用excel模版,生成一个报表,在报表中插入chart图片(chart是通过代码生成的),但更换一台电脑后,发现图片的大小都变了,是什么原因?如何处理?是因为电脑分辨率不同导致的么?

 

目前对图片的设置如下:

 

 Chart.PrintWidth = 220 '设置图的宽度
 Chart.PrintHeight = 40 '设置图的高度
 s(63,0).Value = New XLS.Picture(Chart.Image) '设置图表插入位置


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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 12:53:00 [显示全部帖子]

我尝试用下面的代码修改后,还是有问题,是否还有其他方法? 备注,我自己的电脑是1366*768分辨率

 


        Chart.PrintWidth = 220 * (SysInfo.ScreenWidth/1366) '设置图的宽度
        Chart.PrintHeight = 40 * (SysInfo.ScreenHeight/768) '设置图的高度
       
        s(63,0).Value = New XLS.Picture(Chart.Image) '设置图表插入位置.


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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 13:02:00 [显示全部帖子]

 

 

问题补充如图:在自己电脑上已经设置好图片的大小可以覆盖excel灰色单元格,但更换一台电脑后发现图像变小了。

 


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


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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 16:45:00 [显示全部帖子]

 

请查看附件:

 

我通过按钮调用excel模板并插入图片(图片由代码生成且设置了图片大小的像素),但excel的行高和列宽是固定的,当换用一台电脑时发现图片尺寸就变了,而不像设计时的嵌套效果。

 

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


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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 16:46:00 [显示全部帖子]

是否有什么方法可以直接将chart的image尺寸固定,不随电脑的像素变化?

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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 17:03:00 [显示全部帖子]

 请问您看到的报告模版是否为一段文字后加入一张图片,如下截图“希望结果”一样,还是如“捕获”图片一样,图片将文字遮挡掉了?

我在自己电脑上运行时是希望结果,但换一台就变了

 

 


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

 


 


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

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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/8/31 17:17:00 [显示全部帖子]

补充一下,

设计思路是:生成图片并设定大小-----〉在某一单元格插入图片---〉调整单元格大小与图片相同。

 

9楼的2张图片中,第2张是我要的效果,上传的列子中本机执行后出来也是理想的,因为是我将图片的大小与excel单元格的大小调整的相同了。

 

(备注:excel的行高单位是磅,列宽是英寸,换了电脑后没有变化,但图片会随电脑像素变化,尽管增加了SysInfo.ScreenWidth/height也无效)

 

但换了1台电脑后,出来的就是第1张图片的效果,把30~34行给遮挡住了。要不就是图片便小了,像4楼的效果。

 

 


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


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/9/6 10:15:00 [显示全部帖子]

谢谢bin。按照您固定图片大小的方法修改后,可以用了,测试了几台电脑图片大小没有因分辨率而变化,谢谢!

 

唯一有点瑕疵的是,图片没有原来直接插入Chart那么清晰了。


 回到顶部