掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Wordファイルのページ番号を取得するには？ (ID:6353)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 Wordファイルを開いて、はじめのページと最後のページのページ番号を 取得したいと思っております。VBAでは取得できるのでDelphiアプリから も可能だと思うのですが、VBAのマクロに対応するプロパティが分からず 困っております。よろしくお願いします。 // Dim st As Integer // Dim en As Integer // st = Selection.Sections(1).Headers(1).PageNumbers.StartingNumber // en = Selection.Information(wdNumberOfPagesInDocument) procedure TForm1.Button1Click(Sender: TObject); var Path:OleVariant; begin Path:=ExtractFilePath(Application.ExeName)+'文書1.doc'; WordApplication1.Connect; WordApplication1.Visible:=True; WordApplication1.Documents.Open(FilePath, EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam); WordDocument1.ConnectTo (WordApplication1.ActiveDocument as _document); //文書1.docのページ番号を取得 WordDocument1.?? end; よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.