当前位置:编程学习 > VB >>

word如何取得当前页的剩余高度

目前手头有许多文章,需要依次进行以下步骤:
首先插入一张表格,里面有该新闻的名称、链接、作者、日期等内容。然后接着插入扫描图,这些部分都已实现。
现在有个问题,那些扫描图的第一张,要求必须缩小放入表格所在页。
但是直接插入的图片都很大,会直接跳到下个页面中。
更悲剧的是,由于表格内容不定,导致表格高度不定,所以图片无法直接设置为固定大小。
而必须根据该页面的剩余高度,来设置图片高度。
但是word中页面的剩余高度是怎么获得的?查了许久都没找到需要的命令。
麻烦大家帮忙看看,具体该怎么做?或者能有其他的方法实现图片自动缩放那也行。
拜托了! 直接接设置图片的高度和宽度为要插入的表格的高度和宽度
ActiveDocument.InlineShapes(j).Height = 362 '设置高度
ActiveDocument.InlineShapes(j).Width = 481.87 '设置宽度
http://download.csdn.net/detail/veron_04/1627134
引用 1 楼 chinayuppie 的回复:
直接接设置图片的高度和宽度为要插入的表格的高度和宽度
ActiveDocument.InlineShapes(j).Height = 362 '设置高度
ActiveDocument.InlineShapes(j).Width = 481.87 '设置宽度

不是这个问题,图片不是插入在表格里面的。

就是如上图的情况,第二页的图片要自动缩小插入到第一页下方,但是第一页上方的内容长度是不固定的。所以占用的高度也是不固定的。所以图片无法设置为固定大小。
因此需要获得页面的剩余高度,以设置图片高度。
引用 2 楼 veron_04 的回复:
http://download.csdn.net/detail/veron_04/1627134


这份资料说我手头也有,但请恕我愚钝,始终找不到需要的命令,能否指点下? 我原先的想法是,取得有表格的那页的最后一行,取得该行的top值,然后加上该行的行高,可是也找不到相应的命令…………
麻烦大家帮忙看看是否有解决的方法。
补充:VB ,  VBA
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,