グッドデザイン賞を受賞したウォーターサーバー >>

エクセル2010を使っております。
あるシートの中で改ページしたい箇所があるのですが、改ページプレビューの画面で一箇所だけ改ページの線を移動させるとそのシートにおける全ての改ページの線がその動きに連動するようで移動してしまいます。

改ページの線を移動させた箇所だけ改ページするにはどうすれば良いかお教えください。

A 回答 (6件)

明示的に改ページとは、改ページ線が「実線」で表示されているかどうかで分かります。


点線で表示される改ページは、ページ設定の余白サイズから自動的に割り振られた改ページであり、実線で表示されている改ページは、ユーザーが任意の位置に定めたものです。

最終ページの改ページ位置を変更したい、ということであれば、そのページの1つ前の改ページ線を「実線」にします。(明示的に改ページする)
やり方は、点線の改ページが表示されている下の行の行番号を選択して右クリック→改ページを挿入とします。

ただし、印刷においてシート全体の印刷倍率は統一されるので、最後のページだけちょっと多く行を入れたい、といったことを行うと、印刷時にはそのページを基準とした倍率で印刷されることになります。
1つのシート内では、ページごとの印刷倍率を変更することはできません。
    • good
    • 0
この回答へのお礼

ありがとうございます。
点線を実線にすることはできましたが、その状態で最終ページの改ページ線を移動させても状況はまったく変わらず、シート全体(当該改ページより前の部分も含めた全体)の改ページがされてしまいました。

最後の段落にページごとの印刷倍率を変更することはできないと書かれていますが、つまり一つのシート内で一か所のみ改ページ線をずらしてもその箇所の前後を問わずそのシートにおいては全箇所の改ページ位置がずれてしまうという理解でよろしいでしょうか(?)

お礼日時:2015/06/23 09:01

印刷倍率が変わってしまうのに伴い、自動改ページになっている部分は倍率によって範囲が変更されてしまうようです。


ということで、全部の自動改ページ設定を手動で位置設定しないと、お望みのことは難しいようです。
    • good
    • 0
この回答へのお礼

ありがとうございます。
めんどくさいけど、一部だけ改ページ線を変更するのは無理ということですね。

お礼日時:2015/06/24 11:44

ページのレイアウトが、「次のページ数にあわせて設定」とかになっていませんか?

    • good
    • 1
この回答へのお礼

ありがとうございます。
しかし、「次のページ数にあわせて設定」にはなっておりません。

お礼日時:2015/06/22 09:30

他の場所には明示的に改ページを設定しているのでしょうか?していなければ、他のページの改ページ位置が全部ずれるのは当然の結果です。



例えば全部で50行の、1ページに10行ずつ入った改ページ設定がされていないシートがあった時、これの15行目に改ページを設定すると、2ページ目は11~15行目が入ることになります。それ以降のページはそこから10行ずつ、16~25・26~35・36~45・46~50行目が入ります。

「いや、それじゃあ困る」ってことなら、3ページ目以降の改ページ位置も指定してあげる必要があります。そうしないとExcelは、今のページ書式と行の高さから1ページに何行入るか計算して、それに一番近い行数を入れようとするため、先の例のようなことになってしまいます。

複数ページにまたがるシートを作成するときは、明示的に改ページを設定しておいた方が何かと無難です。じゃないとプリンタが変わったら、今まで1ページに入っていたものが2ページにまたがってしまうトラブルの原因になります。自社のプリンタだといけるのに、客先にファイルで渡して印刷してもらったら2枚に分かれちゃった、なんてのはよくある話なので。
    • good
    • 0
この回答へのお礼

詳しいご回答をいただいて申し訳ないのですが、改ページ線が全部ずれてしまうとは、改ページをいれた箇所以降のみではなく、それ以前も含めて全部です。

また、明示的に改ページを設定しているとはどういった状態のことでしょうか。改ページ線はすべての個所において、改ページプレビューで表示すると見えるようになっております。

お礼日時:2015/06/22 09:30

No.1です。


例えば、3ページ目の改ページ線を変更したい場合、変更する前に今の4ページ目の先頭に改ページ線を入れて下さい。
その後3ページ目の改ページ線を操作すれば4ページ目以降には影響を与えません。
    • good
    • 0
この回答へのお礼

ありがとうございます。
しかし、NO.3の方の回答もみてようやくわかったのですが、すべての改ページがずれるとは、改ページ線を入れた以降だけのことではなく、それよりも前の部分についてもずれてしまいます。

具体的には11ページ目(最後のページです)に入るところの改ページ線のみをずらしたいのですが、そこをずらすと1ページ目から11ページ目まですべての改ページ線がずれてしまいます。

回答者様のいわれるとおりの操作をしても状況が変わらないというか、移動させたい改ページ線が当該シート最後の改ページ線なんです。

お礼日時:2015/06/22 09:22

改ページの線を移動させたいページの次のページの先頭に改ページを予め設定しておけば、そのページを含めた以降のページは移動しなくなります。

    • good
    • 0
この回答へのお礼

申し訳ないのですが、理解できませんでした。
「改ページの線を移動させたいページの次のページの先頭に改ページを予め設定しておく」とはどういうことでしょうか?

お礼日時:2015/06/19 17:26

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QExcelの改ページプレビューの実線と破線

Excelの改ページプレビューで、
ページの境(改ページ)が実線になっているときと破線になっていることがあります。

デフォルトで自動に設定されたものが破線で、自分で動かすと実線になるようです。

実線の改ページをやめて、すべて破線にするにはどうすればよいですか?


Excel2000

Aベストアンサー

q0716qさん、こんにちは。

>デフォルトで自動に設定されたものが破線で、
>自分で動かすと実線になるようです。

そのようですね。

>実線の改ページをやめて、すべて破線にするにはどうすればよいですか?

改ページプレビューの状態で、
シート上で右クリックして、「すべての改ページを解除」としてみるのはどうでしょうか。

Q改ページプレビューで設定した範囲が勝手に変わってしまいます。

改ページプレビューで設定した範囲が勝手に変わってしまいます。
エクセルで改ページプレビューで、A4横1枚で収まるように設定をしたファイルがあるとします。
通常でしたら次回そのファイルを開くと、前回設定した範囲でA4横1枚になっているはずなのですが、ファイルを開くと勝手に選択範囲が変わってしまい、A4横1枚に収めていたものが、3枚に分割されてしまったりします。毎回そうなるのではなく、前回の選択範囲を覚えたままの日もあります。
このような症状が起こるのは、どのような原因が考えられますか?
ご回答よろしくお願いいたします。
以上

Aベストアンサー

それは、設定が、横でされていたものが縦になってしまうからだとは思うのですが、プリンタ・ドライバを複数使っているとか、もしくは、プリンタ・ドライバをなしにして設定しているからではないでしょうか?

だから、設定する前に、一旦、プリンタ・ドライバを確認する必要があるのだと思います。

  Excel <----> プリンタ・ドライバ ----->プリンタ

それと、一度、印刷ページ・プレビュー側で、上下左右のマージンが正しく設定されているか、見ていただいたほうがよいと思います。一度設定したら、設定が飛んでしまうということはまずありませんから。

Qエクセルの印刷範囲が変わってしまう

windows8.1になり、今まで作成していたエクセルのデータの印刷範囲がすべてずれてしまいました。
使用するofficeは2013で、これまで使用したofficeは2003、2007、2010が混在していますが、どれもファイル形式は.xlsです。
富士通のPCを購入したので、問い合わせてみるとofficeが2013になったため仕方がない、との回答でしたが、先日もう一台購入し、こちらは東芝ですが、windows8.1のoffice2013搭載のものでした。
なんとエクセルの印刷範囲はずれません。
どういうことでしょうか?
なぜずれるのかといいますと、行や列の幅が、同じファイルを開いても、東芝PCでは同じ幅なのに、富士通PCで開くとたとえば行の高さが20で作ったものが20.1に変わっています。
そのため少しずつ差が開き、印刷範囲がずれるようです。
対処法をご存知の方、また同じ現象でお困りの方、情報をください。
会社で使用しているPCなので、この不具合に大変困っています。

Aベストアンサー

コントロールパネル→ディスプレイに
スライダー("すべてのディスプレイで同じ拡大率~"にチェックが入ってる場合は小・中・大・特大)があります。
これを前機種と同じ値にすると直ると思います。

拡大率を下げたのではないでしょうか?

QExcelVBA 改ページの横破線を消す方法

Excel VBAで、以下のようなことをしたいです。

前置き:
Excelのシートで、一覧があります。
この一覧は、事前にA4の紙四枚に印刷出来るように印刷範囲、改ページの設定をしてあります。
●印刷範囲指定
・a4縦に印刷
・一覧は、横長12列 x 4が、印刷範囲に指定
・1ページ内に、12列含む、縦長のa4に印刷

このシートを、別のブックに保存でコピーして、ブックが表示されると
この改ページが結構乱れていて、指定していたようなa4 x 4枚の紙に印刷出来ません。

それを、vbaコードである程度修正したましたが、それでも、
横に破線が一本表示されてしまい、そこで、改ページされてしまいます。

手動ならば、この破線をマウスで下にスクロールして、消す事は出来ますが、それをvbaで消したいのですが、どうすれば良いでしょうか。消すというのは削除するということです。
その破線が、どの行のbOTTOM部分に位置しているか判断する方法がわかりませんので、vbaでその破線をスクロールするのは難しそうですし、消す方法もわかりません。

よろしくお願いします。

Excel VBAで、以下のようなことをしたいです。

前置き:
Excelのシートで、一覧があります。
この一覧は、事前にA4の紙四枚に印刷出来るように印刷範囲、改ページの設定をしてあります。
●印刷範囲指定
・a4縦に印刷
・一覧は、横長12列 x 4が、印刷範囲に指定
・1ページ内に、12列含む、縦長のa4に印刷

このシートを、別のブックに保存でコピーして、ブックが表示されると
この改ページが結構乱れていて、指定していたようなa4 x 4枚の紙に印刷出来ません。

それを、vbaコードである程度修正し...続きを読む

Aベストアンサー

ANo1です。

>それを、vbaコードである程度修正したましたが・・・
とありましたので、A4にきちんと収まるように修正がなされていて、改ページ位置だけがうまく調整出来ないという状況かと思いましたが、どうやら違うのかも知れませんね。

どのような方法でコピーなさっているのかわかりませんが、改ページの設定をする前に、セルサイズやページ印刷の設定(余白など)についても、予定の内容に再設定しておかないと、改ページの位置を予定通りに設定できない場合があります。

あとは、設定の際にいきなり既存の改ページをキャンセルしようとしても物理的に無理な場合はできません。
再設定の手順としては、(確実に改ページできるとわかっている)予定の位置にまず改ページを設定したうえで、残りの不要な部分について削除する必要があります。
理由についてはANo2様が言及していらっしゃいますので省略。

Qエクセル VBA 水平改ページ位置の変更方法について教えてください。

おはようございます。いつも大変お世話になっています。

エクセルで、ある元のシートから、ある条件で抽出して新しいシートを作りました。
その新しいシートの印刷指定方法について教えてください。

最初だけ53行、その後50行づつ区切って印刷したいため、以下のようなVBAを書いてみました。

ActiveWindow.View = xlPageBreakPreview
Set ActiveSheet.HPageBreaks(1).Location = Range("a53")
Set ActiveSheet.HPageBreaks(2).Location = Range("a103")
Set ActiveSheet.HPageBreaks(3).Location = Range("a153")
Set ActiveSheet.HPageBreaks(4).Location = Range("a203")
Set ActiveSheet.HPageBreaks(5).Location = Range("a253")
・・・・・・

が、元のシートのデータが、日によって変動するため、新しいシートのデータが全部で120行位で終わってしまう場合があります。
その場合、100以上の指定していた部分から、
「インデックスが有効範囲にありません」と、止まってしまうのです。

日によってデータの行数は変わりますが、多い場合も同じように50行区切りで印刷したい場合には、どのようにしたら良いでしょうか?

どうぞよろしくお願いします。

おはようございます。いつも大変お世話になっています。

エクセルで、ある元のシートから、ある条件で抽出して新しいシートを作りました。
その新しいシートの印刷指定方法について教えてください。

最初だけ53行、その後50行づつ区切って印刷したいため、以下のようなVBAを書いてみました。

ActiveWindow.View = xlPageBreakPreview
Set ActiveSheet.HPageBreaks(1).Location = Range("a53")
Set ActiveSheet.HPageBreaks(2).Location = Range("a103")
Set ActiveSheet.HPageBreaks(3).Locat...続きを読む

Aベストアンサー

>どうしたら良いのでしょうか?

印刷は実行していませんが、改ページプレビューで確認しても、指定位置できちんと動作していますが・・・。

実行するときに対象のシートがアクティブ(前面)になっていますか?
そうで無いなら、ActiveSheet を Sheets("Sheet2") など書き換えてテストしてみてください。

Q改ページの2ページ目の作り方

エクセルで、改ページプレビューを押すと、
青い線が出てきて印刷範囲を指定できますよね?
あれでA4一枚で印刷できる大きさなんですけど
2枚に分けたい時はどうすればいいのでしょうか?
増やそうとしても一枚目の範囲が大きくなるだけ
なんです。
質問の仕方がうまくなくて申し訳ないです。

Aベストアンサー

上下に分けたい場合、分割したい行の行番号を右クリックして改ページ挿入。
左右に分けたい場合、分割したい列の列番号を右クリックして改ページ挿入。

QExcel シートのコピーの際、ページ設定が保持されない

職場でExcel2007を使っています。

あるファイルのシートをコピーして、別のファイルに貼り付けたのですが、元のファイルに設定してあったページ設定が反映されません。
拡大/縮小印刷100%で1ページに印刷されるはずが、1列はみ出してしまいます。
元のページ設定を保持したまま別のシートにコピーは出来ないでしょうか?それとも何か不具合が出ているのでしょうか。
何か解決法がありましたら教えてください。

Aベストアンサー

補足がないので憶測回答になってしまいますが…。

・同一のPC・プリンタで、
・コピー&ペーストではなく[シートの移動またはコピー]を使用
したにも関わらず印刷範囲が変動するということであれば、
[ページ設定]ではなく[スタイル]設定の違いによる現象かもしれません。

これはExcelのバグ(MS的表現で言うところの"仕様")だと思うのですが、

 >>スタイル設定の異なるブック間でシートをコピーすると印刷範囲に影響が出ます<<

●再現手順
1.新規ブックを2つ作成する(Book1,Book2とする)
2.Book1の[標準]スタイルのフォントサイズを1ポイント大きくする
3.Book1_Sheet1の適当な列(例えばK列)が1ページ目に"ギリギリ入る"よう列幅を調整する
4.Book1_Sheet1をBook2にコピーする
⇒同じ設定・同じ列幅にも関わらず、コピーしたシートのK列は1ページ目に収まらない。
(Excel2000,2002,2003で挙動確認)

コピー元とコピー先のブックのスタイル設定を一致させれば、
コピー元ブックと同様の設定で同じ印刷結果を得ることができますが、
スタイル設定を変更した時点でどうせ列幅が変わってしまいますし、
何よりブックの他のシートにも影響が出てしまいます。
結局、その都度列幅等の設定を再調整するのが現実的かと思われます。

実は私自身この件で随分苦労しました。
↓などもおそらく同様のトラブルだと思います。
http://www2.moug.net/bbs/exopr/20070911000024.htm
既定のフォントサイズを10Pや9Pにしている人も少なくないので、
結構ありそうなトラブルだと思うのですが、
検索しても何故かあまりHITしないようです。

以上ご参考まで。

なお、当方Excel2007環境がありませんので、上記再現手順を含め、
具体的な操作方法についてはわかりかねます。
ご容赦ください。

補足がないので憶測回答になってしまいますが…。

・同一のPC・プリンタで、
・コピー&ペーストではなく[シートの移動またはコピー]を使用
したにも関わらず印刷範囲が変動するということであれば、
[ページ設定]ではなく[スタイル]設定の違いによる現象かもしれません。

これはExcelのバグ(MS的表現で言うところの"仕様")だと思うのですが、

 >>スタイル設定の異なるブック間でシートをコピーすると印刷範囲に影響が出ます<<

●再現手順
1.新規ブックを2つ作成する(Book1,Book2とする)
...続きを読む

Qページが増える

エクセルで、何もないのにページ数が増え
印刷すると白紙が出てきてしまいます
原因と対策が分かられる方、よろしくお願いします

Aベストアンサー

> エクセルで、何もないのにページ数が増え
> 印刷すると白紙が出てきてしまいます

何も見えなくても、例えば「スペース」が1個入力されているとそのセルまでが印刷の対象になります。
印刷時白紙が出ないようにするには、

1) 「改ページプレビュー」表示にして、不要なページの有無を確認します。
2) 不要な部分の青い線をドラッグして、印刷範囲を設定します。

「エクセル2010基本講座:改ページと改ページプレビュー」
http://www4.synapse.ne.jp/yone/excel2010/excel2010_print_page.html

QVBAでの改ページ位置の変更

こんばんわ。

検索したり、自分でも考えてみたのですが、壺にハマっているようで、
どなたかお助けください。

Excelで以下の様な表があります。
営業所コード 部署 氏名 ・・・(横幅はA4に収まるサイズです)
  001    001 AAA
  001    002 BBB
(コードに変化があるたびに、1行空白があります。)
  002    001 CCC
[------------------------] O
  003    001 DDD
  003    001 DDD
<------------------------> X
  003    002 EEE

このような表が縦にいくつも並びます。
印刷時にA4サイズの用紙からはみ出した部分について、
上記の「003」のような位置(Xの位置)に自動的に入ってしまう改ページを防ぎ、
003の一番上の行の上部(Oの位置)で改ページしたいのです。
何か良い方法はないでしょうか?

縦方向は集計のたびに変位するので、特定のルール化ができなくて困っています。

改ページ位置(行数)を取得して、その上のデータの可否をチェックしていくというのが、
Betterな方法なのでしょうか?
ページ数で20~30ページになるので、このループ処理が良いのかどうか。。。

こんばんわ。

検索したり、自分でも考えてみたのですが、壺にハマっているようで、
どなたかお助けください。

Excelで以下の様な表があります。
営業所コード 部署 氏名 ・・・(横幅はA4に収まるサイズです)
  001    001 AAA
  001    002 BBB
(コードに変化があるたびに、1行空白があります。)
  002    001 CCC
[------------------------] O
  003    001 DDD
  003    001 DDD
<------------------------> X
  003    002 EEE

このよ...続きを読む

Aベストアンサー

こんにちは。

>どこか間違っていますでしょうか?

たぶん、コードの置いてある場所が、標準モジュールではなく、シートモジュールで、いくつかの条件が組み合わされば、Rangeオブジェクトのエラーは出ます。エラーが出ないように直しました。

それと、コードを見るまで、全体を縮尺を縮めるというのは、私の想像していたものとは、かなり違ってきますね。いろいろ試してみましたが、繰り返し行うせいでしょうか、PageBreaksで取れる行が不安定ですね。以下は、垂直改ページを取るサブルーチンを加えてみました。なお、物理的水平改ページは、どんなに改ページReset しても、残りますから、1ページ1行しかないところが出てくることはあります。


Sub HBreake_Aligment2()
  Dim myPrintArea As String
  Dim DefaultPageRow As Integer
  Dim LastRow As Long
  Dim PreRow As Long
  Dim cnt As Integer
  Dim NewRow As Long
  With ActiveSheet
   If .PageSetup.PrintArea = "" Then
     MsgBox "印刷範囲を設定してください", 16
     Exit Sub
     Else
     myPrintArea = .PageSetup.PrintArea
     LastRow = .Cells(65536, .Range(myPrintArea).Column).End(xlUp).Row
     If .Range(myPrintArea).Cells(.Range(myPrintArea).Count).Row > LastRow Then
      .PageSetup.PrintArea = .Range(myPrintArea).Resize(LastRow).Address(0, 0)
     End If
   End If
   .ResetAllPagereaks
   'サブルーチン
   Call VPageDragoff
   Application.ScreenUpdating = False
   DefaultPageRow = _
   Application.ExecuteExcel4Macro("(INDEX(GET.DOCUMENT(64),1," & 1 & "))")
   PreRow = DefaultPageRow
   Do
     NewRow = MyNewRowFind(PreRow)
     .HPageBreaks.Add .Cells(NewRow, 1)
     PreRow = NewRow + DefaultPageRow
   Loop Until PreRow > LastRow
   Application.ScreenUpdating = True
   .PrintOut Preview:=True
  End With
End Sub
'
Private Function MyNewRowFind(ByVal myRow As Long)
Dim j As Long
Dim flg As Boolean
 With ActiveSheet
  '25行前まで探す
  For j = myRow - 1 To myRow - 25 Step -1
   If .Cells(j, 1).Value = "" Then
    flg = True
     Exit For
   End If
  Next j
  If myRow > j + 1 And flg Then
  MyNewRowFind = j + 1
  Else
  MyNewRowFind = myRow
  End If
 End With
End Function

Sub VPageDragoff()
'垂直改ページのドラッグオフ
Dim myVbp As Integer
With ActiveSheet
  Application.ScreenUpdating = False
   .PageSetup.Zoom = 100
  myVbp = ExecuteExcel4Macro("COLUMNS(GET.DOCUMENT(65))")
  If myVbp > 1 Then
   ActiveWindow.View = xlPageBreakPreview
   .VPageBreaks(1).DragOff xlToRight, 1
   ActiveWindow.View = xlNormalView
  End If
End With
  Application.ScreenUpdating = True
End Sub

こんにちは。

>どこか間違っていますでしょうか?

たぶん、コードの置いてある場所が、標準モジュールではなく、シートモジュールで、いくつかの条件が組み合わされば、Rangeオブジェクトのエラーは出ます。エラーが出ないように直しました。

それと、コードを見るまで、全体を縮尺を縮めるというのは、私の想像していたものとは、かなり違ってきますね。いろいろ試してみましたが、繰り返し行うせいでしょうか、PageBreaksで取れる行が不安定ですね。以下は、垂直改ページを取るサブルーチンを加えてみ...続きを読む

QExcelの印刷レイアウトの青線(実線・点線)の違いは何でしょうか?

Excelの印刷レイアウト画面で青い実線と青い点線があるのですが、この違いはあるのでしょうか?
普通に印刷する分にはちゃんとこの実線でも点線でも同じように印刷できるのですが、違いがわからず気持ちが悪いです。ただ、見た目の問題で濃い線を使っている所は実線、線がないところは点線という違いなのでしょうか?

Aベストアンサー

改ページプレビューのことなら
外枠の青い実線は印刷範囲
内側の青い点線は改ページ(用紙の設定で自然に設定されます。)
内側の青い実線は指定した改ページ(自分で指示した改ページです。)
です。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング