java如何获取word文档页数

java如何获取word文档页数,第1张

XWPFDocument docx = new XWPFDocument(POIXMLDocumentopenPackage(电月度例会会议纪要docx));

int pages = docxgetProperties()getExtendedProperties()getUnderlyingProperties()getPages();//总页数

int wordCount = docxgetProperties()getExtendedProperties()getUnderlyingProperties()getCharacters();// 忽略空格的总字符数 另外还有getCharactersWithSpaces()方法获取带空格的总字数

Systemoutprintln (pages= + pages + wordCount= + wordCount);}

public static void parse97() throws Exception {

WordExtractor doc = new WordExtractor(new FileInputStream(电月度例会会议纪要doc));

点击左下角的字数,会出来字数统计对话框,里面有字数和行数,要知道某一页有多少行,就先选中该页的全部内容,再点击左下角打开字数统计对话框,这时候显示的行数是选中部分的行数

下面的代码在我电脑上执行通过,希望对比编程有所借鉴:

Option Explicit

Sub YgB()

    Dim n, f

    n = 0

    f = Dir("d:\我的文档\exp\doc")

    While f <> ""

        n = n + 1

        f = Dir

    Wend

    MsgBox "总共有" & n & "个WORD文件"

End Sub

sub

aa()

fn="D:\111doc"

'定义word的路径

set

c

=getobject(fn)

’打开word文件

Set

d

=

ctables(1)

'读取word里面的第一个表格

Cells(1,

1)

=

dcell(1,

1)

‘A1=word里面的第一个表格里面的第一个单元格的值。

cclose

set

c

=nothing

end

sub

'一、表格标题一般应该是题注,判断题注内容

SelectionParagraphs(1)Style = "题注"

InStr(1,SelectionParagraphs(1)RangeText,"表") <> 0 '这里方法很多,可以通过域判断,也可以根据其他规则判断

'二、获取题注的结尾

styleEnd = SelectionParagraphs(1)RangeEnd

'三、判断表注后面是否为表格

'参考2#

ActiveDocumentRange(styleEnd, styleEnd + 1)Information(wdWithInTable)

'四、请尽量少使用Selection

'Selection使用得越少,代码效率越高

亲,代码如下,查找第一次出现“ABC”的所在页的页码。请根据情况自行修订需要查找的字符:

Sub cz()

Dim MyRange As Range

Set MyRange = ActiveDocumentContent

MyRangeFindExecute FindText:="ABC", Forward:=True

MsgBox MyRangeInformation(wdActiveEndPageNumber)

End Sub

以上就是关于java如何获取word文档页数全部的内容,包括:java如何获取word文档页数、怎样取得word文件的总页数和每页的行数、如何利用VBA获取文件夹里边word文件个数等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9638561.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-30
下一篇 2023-04-30

发表评论

登录后才能评论

评论列表(0条)

保存