- ベストアンサー
EXCEL のペ－ジ
izmlzの回答
↓のマクロでいかがでしょうか？ Sub test() Dim PPage As Integer Dim i As Integer Dim RFooter As String Dim LFooter As String Const myFooter As String = "&P" PPage = Application.ExecuteExcel4Macro("get.document(50)") '総ページ数を取得 For i = 1 To PPage If i Mod 2 = 1 Then RFooter = myFooter '奇数ページの場合右フッターにページ番号 LFooter = "" Else RFooter = "" LFooter = myFooter '偶数ページの場合左フッターにページ番号 End If With ActiveSheet With .PageSetup .RightFooter = RFooter .LeftFooter = LFooter End With .PrintOut From:=i, To:=i ', Preview:=True '←プレビューでチェックしたい場合、「'」をはずす End With Next End Sub 記マクロを実行するには、以下の手順です。 1.上記マクロの Sub から End Sub までを選択してCtrl+C (コピー) 2.Alt+F11(メニュー[ツール]-[マクロ]-[VBE]) →VBE（Visual Basic Editor）が開く 3.プロジェクトエクスプローラで、VBAProject(<当該ブック名>)を選択 4.メニュー[挿入]-[標準モジュール] 5.Ctrl+V (貼り付け) 6.Alt+F4（メニュー[ファイル]-[終了してMicrosoft Excelへ戻る]） 7.この処理を実行したシートを表示した状態で、Alt+F8(メニュー[ツール]-[マクロ]-[マクロ]) 8.実行したいマクロ名（この場合、test）を選択 9.[実行]ボタンをクリック エクセル技道場－マクロ http://www2.odn.ne.jp/excel/waza/macro.html
関連するQ&A
- Wordのペ－ジ番号について
word2000で報告書を作成していまして、その報告書にペ－ジ番号を表示させたいのです。まず、報告書内容は、表紙、目次、文章というような順番で作成しています。表紙、目次にはペ－ジ番号を表示させたくないので、セクション区切りを目次の後につけて表示してみたのですが、文章から１ペ－ジが始まったかわりに、表紙にも１ペ－ジと表示されてしまいました。1つのファイルの中で文章のみにペ－ジ番号を表示させる方法を教えてください。。。お願い致します。
- ベストアンサー
- オフィス系ソフト
- ペ－ジの削除で教えてください
2010のワ－ドですが原稿用紙で作成したところ６ペ－ジだけ書き入れましたが、 白紙(罫が書かれている)のページがたくさん、続いて表示されてしまいます、 どの様にして削除したらよいか教えて頂けませんか。 よろしくお願いします。
- 締切済み
- Windows XP
- 全ペ-ジ印刷できない
プリンタ-はDCP-J567Nで、PCはNEC LL750/Cを使用中。WIN7です。 プリント出力時、例えば全4ページなのに、1ペ-ジと2ペ-ジ目の途中で、プリンタ-がかってに止まります。 何度やっても同じなので、しようが無いから、1ペ-ジ毎に印刷しています。 どなたか良い方法がありませんか？ ※OKWAVEより補足：「ブラザー製品」についての質問です。
- 締切済み
- プリンター・スキャナー
- ペ-ジが開かない
ぺ-ジをを開こうとして、クリックしても開かず、ステ－タスバ－の中に含まれてしまうとともに、左下にタイトルバ－だけが表示されるのはどうしてでしょうか？
- 締切済み
- その他（インターネット・Webサービス）
- ペ－ジを表示できません
インタ－ネットを開けたときペ－ジを表示できませんという状態を意図的にすることが可能でしょうか。これはある 職場でネットばかりみているので意図的にやりたいらしいです。反対にもし、やられた場合はそのはずしかたがあればおしえてください。この質問は私の好奇心からです。
- ベストアンサー
- ネットワーク
- wordのぺ－ジ印刷
ワ－ドで作成した文章を、フッタ－を設定をして、ペ－ジ挿入をして印刷しようと 思うのですが、 印刷レイアウト表示画面では、ペ－ジ番号が入っているのですが、 印刷プレビュ－ではペ－ジ番号が消えております。 従って印刷をしてもペ－ジ番号が印刷されません。 何処の設定が間違っておるのでしょうか？教えてください。
- ベストアンサー
- その他（ビジネス・キャリア）
- ペ－ジが表示できません
WINDOWS XP，PENTIUM4 3.0Gでインタ－ネットをしていますが、最近ペ－ジが表示できませんとか、画像がＸになったり、動きが遅くなってしまいました。最初のスピ-ドに戻す、簡単な方法があれば、教えてください。
- 締切済み
- Windows系OS
- エクセルで図の貼り付けを行う際に必ずペ－ジの先頭にくるのを・・・
エクセルで図の貼り付けを行う際に必ずペ－ジの先頭にくるのを防ぎ、現在のページに貼り付ける方法を教えてください。 貼り付け希望場所のセルを選択してから、貼り付けても必ず先頭ページのＡ１のセルの位置周辺に貼り付けられてしまいます。 何ページにもまたがる書類を作成中に先頭まで行って図を掴んでまた戻ってくるのが面倒なのですが、何かよい方法がありますでしょうか？
- ベストアンサー
- オフィス系ソフト
- 新しいタブを開いたとき表示するペ－ジが動かない
新しいタブを開いたとき表示するペ－ジが動かない新しいダブをひらいたときはよく使うサイトが表示される方が私は使いやすいので ※OKWAVEより補足：「NEC 121ware ： Windows」についての質問です
- 締切済み
- その他(Windows)
- 奇数・偶数のページ番号
Word2000を使っています。 1枚目は表紙として、ページ番号は無し。 2枚目は目次として、ページ番号は無し。 3枚目は右下にページ番号を１。 4枚目は左下にページ番号を２。 3枚目以降は奇数・偶数で別指定にするのは分かりますが、どこにセクション区切りを入れたらいいのかがよく分かりません。どなたか宜しくお願いします。
- 締切済み
- オフィス系ソフト
お礼
ありがとうございます。素晴らしいです。