No.1
- 回答日時:
一般機能で出来るかは分かりません。
VBAですべてのドキュメントをループで開き、
アクティブなドキュメントのページ数を取得、
となると思います。
↓はワードVBAですが、エクセルVBAに移植(ある程度の
改造は必要)して、エクセルに情報を転記、としては
いかがでしょう?
http://www.aa.alpha-net.ne.jp/pcfriend/word/Word …
No.2
- 回答日時:
目安にしかならないかもしれませんが、
マイコンピュ-タやエクスプローラで
名前 サイズ 種類 更新日時
などとなっている部分の上でマウス右クリック
→その他...
→□ページ数 にチェックを入れる
でどうでしょうか?
※現在のフォルダ以外にも有効にしたいときは、
ツール
→フォルダオプション
→表示
→すべてのフォルダに適用
No.3ベストアンサー
- 回答日時:
こんばんは。
最初に、BuiltInDocumentProperties は、一旦、開いて、開いたページを、Repaginate しないと取れません。#1の方の引用先のコードは、小さなファイルは可能ですが、大きなファイルでは正しいページが出てこないはずです。
私の考えたものです。
Sub GetWordProperties()
Dim wdApp As Word.Application
Dim wdDoc As Word.Document
Dim Fname As Variant
Dim Fnames As Object
Dim msg As String
Dim wdCnt As Long, wdtitle As String
With Application.FileDialog(msoFileDialogOpen)
.Show
Set Fnames = .SelectedItems
If Fnames.Count = 0 Then
Exit Sub
Exit Sub
End If
End With
For Each Fname In Fnames
Set wdDoc = Application.Documents.Open(Fname, , True)
With wdDoc
.Repaginate
wdtitle = .BuiltInDocumentProperties(wdPropertyTitle)
wdCnt = .BuiltInDocumentProperties(wdPropertyPages)
.Close False
End With
Set wdDoc = Nothing
msg = msg & vbCrLf & wdtitle & " 総ページ数: " & wdCnt
Next Fname
MsgBox msg
End Sub
開かないで、ページ数などの情報を取れる、Dsofile という、タイプライブラリを使う方法があるのですが、ひとつ欠陥があります。一旦、印刷していないものは出来ません。
http://support.microsoft.com/kb/224351/ja
Visual Basic .NET 2003 および Visual Basic .NET 2002 で Dsofile.dll を使用すると Office がなくても Office ドキュメントのプロパティを編集できる
それから、ファイル-ファイルを開くで、プロパティ表示をしたらどうでしょうか。人が一旦作って保存したものなら、プロパティが出てくるはずですから、1,000ぐらいなら、何とかなるかもしれません。ただ、すべてのDocument にプロパティが見れるとは限りません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Chrome(クローム) Chromeのアドレスバーに履歴等を表示させないようにしたい 2 2022/09/08 14:20
- アプリ Edgeを操作するアプリについて 4 2023/05/11 22:48
- WordPress(ワードプレス) ワードプレスで、投稿一覧ページにタグを表示する方法 投稿につけたタグを、記事一覧ページにもカテゴリと 1 2023/05/10 21:41
- Visual Basic(VBA) 複数ページあるPDFファイル内の文字列等の情報をキーにPDFをグループ分け分割したい。 2 2022/06/25 09:51
- HTML・CSS htmlのデータをwebページみたいに見る方法 5 2023/06/23 17:47
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルブックの全シートの非表示列を再表示したい 1 2022/12/24 20:48
- マルウェア・コンピュータウイルス PCのセキュリティについて gmailにOneDriveから「ランサムウェアの兆候が検出されました」 1 2023/01/18 18:04
- その他(ブラウザ) IE・edgeで日増しに観られるサイトが減ってくる。 1 2022/10/04 22:40
- PDF EXCEL ページを指定してPDF出力するVBAを教えてください。 2 2023/02/09 10:27
- 楽天市場 楽天の離島送料 2 2022/09/12 15:46
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
複数のワードファイルで合計ページ数を知りたい
Word(ワード)
-
Wordのプロパティ・総ページ数について(VBA絡み)
Word(ワード)
-
wordファイルのページ枚数を知る方法
Word(ワード)
-
-
4
エクセル、ワードのページ数のカウント
その他(ソフトウェア)
-
5
フォルダ階層・ファイル名・ページ数の一覧を出したい
PowerPoint(パワーポイント)
-
6
Excel2010 sumifs関数で、結合セルの「0」と認識される個所を参照する方法を教えて下さい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCEL のドキュメントの回復に...
-
サムネと実際の写真がぜんぜん違う
-
SDカード内の内容をインデック...
-
ワードを開かずにページ数だけ...
-
HP掲示板の保存の仕方 と フ...
-
Illustratorでアートボード内だ...
-
トンボ内をpdfに書き出したい
-
イラストレーター 両面印刷 ...
-
【VBA】Excelの特定範囲のセル...
-
イラレでページ番号をつける方法
-
フォトショ以外でPSDを16bit⇒8b...
-
Illustrator 中の要素ごとアー...
-
テレビ会議での自己紹介
-
PDFのデータをフリーのXChenge-...
-
おすすめの無料 i アプリ??
-
イラストレータをPDFに変換する...
-
IllustratorのバージョンCS3で...
-
TMPGEnc MPEG Editor2.0(...
-
illustratorCS3 B5 見開き ...
-
InDesidnでイラレや画像を配置...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル「テンポラリドキュメ...
-
EXCEL のドキュメントの回復に...
-
ワードを開かずにページ数だけ...
-
CSVのエクセルファイルで ハイ...
-
サムネと実際の写真がぜんぜん違う
-
Excel のファイルを開くと複数...
-
エクセルで特定のファイルだけ...
-
Wordの表示倍率を一定にしたい
-
EXCELファイルの表示
-
ExcelWord2003が開けない「ウイ...
-
wordで保存を押したらドキュメ...
-
PCからjpg gifファイルをSDカー...
-
スライドショー 最後の画面は...
-
サイト上のフォルダ階層一覧、...
-
MS Word:ファイル内のゴ...
-
HP掲示板の保存の仕方 と フ...
-
パワーポイントでPDFファイルを...
-
SDカード内の内容をインデック...
-
イラレでページ番号をつける方法
-
トンボ内をpdfに書き出したい
おすすめ情報