在使用PB对Word进行控制的时候,发现如果OleObject所连接的Word的当前页面的页眉页脚不可见的话那么:
使用Word的GoTo函数不能定位当指定页,如
ole_document.Goto(wdGoToPage,wdGoToFirst,page)
这样会导致不能定位到指定页,以致写入的数据会在第一页,如果使用循环的话,那么会导致死循环等等,不可预知的错误,而且如果Word不以页面视图的方式及页眉页脚不可见那么,也不会返回异常,导致不知道错误在哪儿。
经过查阅,发现了在页面视图模式下,如果页眉页脚不可见,那么就会出现错误,
以下代码可以解决上面的问题
ole_document.ActiveWindow.View.Type = wdPrintView ole_document.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader ole_document.ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
首先把Word设置为页面视图,在定位到页眉,这样页眉页脚就可见了,最后定位到正文。
使用Word的GoTo函数不能定位当指定页,如
ole_document.Goto(wdGoToPage,wdGoToFirst,page)
这样会导致不能定位到指定页,以致写入的数据会在第一页,如果使用循环的话,那么会导致死循环等等,不可预知的错误,而且如果Word不以页面视图的方式及页眉页脚不可见那么,也不会返回异常,导致不知道错误在哪儿。
经过查阅,发现了在页面视图模式下,如果页眉页脚不可见,那么就会出现错误,
以下代码可以解决上面的问题
ole_document.ActiveWindow.View.Type = wdPrintView ole_document.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader ole_document.ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
首先把Word设置为页面视图,在定位到页眉,这样页眉页脚就可见了,最后定位到正文。