以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教wordvba  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172630)

--  作者:hb8888
--  发布时间:2021/10/22 17:37:00
--  请教wordvba
大师:请问用vba读取Word段落时,如果该段是分页符,那如何判断?
--  作者:有点蓝
--  发布时间:2021/10/23 9:08:00
--  
我测试取段落不会取到分页符。

Dim app As New MSWord.Application
try
    Dim doc = app.Documents.Open("d:\\问题\\123.docx")
    Dim Idx As Integer = 1
    For Each k As object In doc.Paragraphs
        Output.Show(Idx & "--------------")
        Idx += 1
        Output.Show(k.Range.text)
    Next
    app.quit
catch ex As exception
    msgbox(ex.message)
    app.quit
End try

--  作者:hb8888
--  发布时间:2021/10/23 14:46:00
--  
谢谢!
再请问word中的表,如何判断表中的某一单元格是否为合并单元格?

--  作者:有点蓝
--  发布时间:2021/10/23 16:23:00
--  
搜了一圈,找不到办法