Word文書がたくさんあります。どれも印刷すればA4ですが、作成者がいろいろなので、ファイルを開いたときの拡大縮小率がバラバラです。それで毎回、作業開始時に自分好みの拡大縮小率へ戻すのを面倒に感じています。私は常に「ページ幅を基準に」または「100%」で開きたいのですが、そのような設定は可能でしょうか? 使っているのはWord2000とWordXPです。あるいは、10000くらいあるWord文書の初期拡大縮小率を一括で変更できるソフトの紹介でもよいです。

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2012/01/17 08:43:05
  • 終了:2012/01/18 14:46:47

回答(2件)

id:taknt No.1

きゃづみぃ回答回数13539ベストアンサー獲得回数11982012/01/17 08:55:27

ポイント100pt

http://furi-sofuto.com/2009/03/pdf.html

いっそのこと 全ファイル 自分用にPDFにしてしまえば いいんじゃないでしょうか?

id:sample2

閲覧7、再編集3くらいの割合ですし、内容を見てから再編集するかどうかを判断するのが基本なので、Wordのままでないと面倒です。

2012/01/17 09:12:48
id:taknt No.2

きゃづみぃ回答回数13539ベストアンサー獲得回数11982012/01/17 09:21:57

ポイント100pt

ワードを開いて
ツール
マクロ
Visual Basic Editor
で VBのエディタを開きます。



Nomal
Microsoft Word Objects
ThisDocument


と開いたところに

Private Sub Document_Open()
    ActiveWindow.ActivePane.View.Zoom.Percentage = 100
End Sub

というのを 貼り付けて ワードを閉じます。

それで 縮小率が 100%以外のファイルを 開いて 100%になっていることを 確認してください。

他1件のコメントを見る
id:sample2

【1】エラーはないが自動実行もされない。
Sub Macro1()
'
' Macro1 Macro
' 幅を100%にする
'
ActiveWindow.ActivePane.View.Zoom.Percentage = 100
End Sub

【2】自動で実行されるがエラーになる。
Private Sub Document_Open()
ActiveWindow.ActivePane.View.Zoom.Percentage = 100
End Sub
実行時エラー '91':
オブジェクト変数または With ブロック変数が設定されていません。

【3】自動で実行されエラーにもならないが、やりたいことと違う。
Private Sub Document_Open()
MsgBox "開いたよ", vbOKOnly, "通知"
End Sub

2012/01/17 11:49:15
id:sample2

http://q.hatena.ne.jp/1326846236 で解決しました。

2012/01/18 14:45:49

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません