MATLAB爱好者论坛-LabFans.com - 查看单个帖子

poster · 2019-12-10, 16:49

您如何使用办公自动化在Microsoft Word中找到第n页的范围？似乎没有getPageRange（n）函数，并且不清楚如何划分它们。

回答：
这是从VBA进行的操作，要转换为Matlab COM调用应该相当简单。

Public Sub DemoPerPageText() Dim i As Integer Dim totalPages As Integer Dim bmRange As Range totalPages = Selection.Information(wdNumberOfPagesInDocument) For i = 1 To totalPages Set bmRange = ActiveDocument.Bookmarks("\Page").Range Debug.Print CStr(i) & " : " & bmRange.Text & vbCrLf Next i End Sub

更多&回答...

2019-12-10, 16:49	#1
poster 高级会员注册日期: 2019-11-21 帖子: 3,006 声望力: 66	如何使用Word Automation获取页面范围您如何使用办公自动化在Microsoft Word中找到第n页的范围？似乎没有getPageRange（n）函数，并且不清楚如何划分它们。回答：这是从VBA进行的操作，要转换为Matlab COM调用应该相当简单。 Public Sub DemoPerPageText() Dim i As Integer Dim totalPages As Integer Dim bmRange As Range totalPages = Selection.Information(wdNumberOfPagesInDocument) For i = 1 To totalPages Set bmRange = ActiveDocument.Bookmarks("\Page").Range Debug.Print CStr(i) & " : " & bmRange.Text & vbCrLf Next i End Sub 更多&回答...