| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]Excel 图片对齐 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100678) |
| -- 作者：Carey -- 发布时间：2017/5/16 13:09:00 -- [求助]Excel 图片对齐 我想让插入到Excel的图片在单元格居中，咋弄呢 Sheet(8, 4).Value = New XLS.Picture(img1,10,5) |
| -- 作者：有点色 -- 发布时间：2017/5/16 14:29:00 -- 你可以获取单元格的宽度和高度，然后设置图片位置和大小。
http://www.foxtable.com/webhelp/scr/1149.htm
不能直接设置居中的，只能设置位置。
|
| -- 作者：Carey -- 发布时间：2017/5/16 16:29:00 -- 回复：（有点色） 你可以获取单元格的宽度和高度... 我想获取合并单元格B9:U9的宽度和长度 还要获取插入到Excel的图片的长宽，这个怎么获取呢，图片本身的长宽和插入到Excel的长宽不一致 |
| -- 作者：有点色 -- 发布时间：2017/5/16 17:05:00 -- 获取图片的长度，这样写
Dim img As image = getimage("g:\\test.jpg")
获取单元格宽度这样写
msgbox(sheet.cols(1).width) msgbox(sheet.cols(2).width) Dim sum As Double = 0 For i as integer = 1 to 20 sum += sheet.Cols(i).width next msgbox(sum) |