• 締切済み

Excelの書式設定

VBAでマクロを作成して表を自動作成しています。 1シートに1種類の表を作成し、全部で8シートあります。それぞれの表は列数・列幅が異なり、A4横1ページにおさまらないものもあります。 すべての表をA4横1ページにおさめたいのですが、ヘッダーもつけたくて、それも同じヘッダーで、出力される大きさも同じにしたいです。 横1ページにおさめることだけを考えれば、印刷設定で設定できますが、ヘッダーを同じ大きさで出力するとなると、縮小もできません。 すべて自動で行いたいのですが、何かよい方法はないでしょうか? よろしくお願いします。

みんなの回答

  • papayuka
  • ベストアンサー率45% (1388/3066)
回答No.2

ヘッダーも含めて縮小されるので難しいと思いますが、、、 全シートの列幅を統一して良いならその方が簡単な気がします。 For Each ws In Worksheets   ws.Columns("A:F").ColumnWidth = 1 Next ws

Petit-Chat
質問者

お礼

ありがとうございました。 とりあえず列幅を統一固定で解決することにしました。

全文を見る
すると、全ての回答が全文表示されます。
  • papayuka
  • ベストアンサー率45% (1388/3066)
回答No.1

意味が良く解らないのですが、横1ページに収まらないものを縮小しないで横1ページに収める方法なんて無いと思いますが、、、 全ページを100%で収まらないページと同じ縮小率にしちゃうとか。

Petit-Chat
質問者

お礼

ありがとうございました。 とりあえず列幅を統一固定で解決することにしました。

Petit-Chat
質問者

補足

実はAccessからExcelを操作していて、できるだけ処理を簡単に行いたくて。同じ縮小率も考えたのですが、提出資料を作成しているため、毎回出力される縮小率が変わってしまうのはまずいみたいで・・・。セル幅を固定とか考えてみたけど、シートの数がたくさんあるのですべてのシートの項目のセル幅を指定するのは大変かなと思って。。。 どうにかヘッダーだけ同じ大きさで表の部分だけ縮小とかできないかなと思って・・・。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • Excel印刷時に列幅を自動調整したい

    教えてください。 Excelで印刷時に列幅を自動的に調整して印刷したいと思っています。 たとえば印刷プレビュをしたときに列数が多くてページが2ページ目まで行ってしまったとします。 このとき印刷サイズの拡大/縮小でA4サイズにするのではなく、自動的に列の幅を変更(縮小)してA4サイズに収まるようにしたいのです。 VBAではなくExcelでもともと提供されている機能として、こういった機能はありますでしょうか?

  • エクセル2000 ページをまたいだ表の列幅について

    1シートに必要事項を収めたいのですが、どうしも1ページ目に入力した表(列幅等さわってます)の次に、2ページ目で全く列幅も違う別の表を作成した時、列幅をさわると1ページ目の表に合わせた列幅も一緒に変わってしまうので、何か良い方法はないでしょうか? ワードの場合は1ページずつのページ設定(例えば1ページ目は縦A4で2ページ目は横とか:改ページ機能)とかみたいな変更方法は無いでしょうか?

  • エクセルでの印刷設定

    こんにちは又よろしくお願いします。元々シートが6ページまである表で1ページ目に6枚まとめての印刷ボタンが作成されています。プリンターはA3サイズが印刷可能で用紙設定はA3で出力は原稿サイズになっています。そこにA4サイズの縮小印刷ボタンを作成しようと思い マクロの記録をはじめて (1)印刷の設定を用紙設定はそのままで出力はA4で設定 (2)実際に印刷する (3)A4サイズの印刷物が出てくる (4)そのままでは元々のボタンで印刷したときA4サイズで出力されるので出力をA3の戻す (5)マクロ記録の終了 これで新たに作った縮小ボタンを押すとA4印刷物が出てきてその後設定は元のサイズに戻ると思ったのですが、実際印刷してみるとA3の物しか出てきません。正しいマクロ設定をご教授よろしくお願いします。

  • エクセルの拡大縮小印刷の自動設定について

    エクセル2000です。 大きな表を自動的に縮小印刷するため、「ページ設定」の「拡大縮小印刷」の機能をよく使います。 たとえば列は若干はみ出る程度ですが行数が多く、縦に極端に長い表の場合、余白を目いっぱいとったのち、「印刷の向き」を「横」にし、「拡大縮小印刷」で横1×縦1000ページを設定すると、自動的に縮小率が計算され、何十ページかの表になります。 ところが、今回、列はAからSまでですが行数が4000を超える非常に大きなシートでこれをやったところ、縮小率が正しく計算されません。 いくつか試しましたが手動で設定すると80%程度になるはずのものが、極端に小さくなってしまうのです。 いろいろやってみたら、FontがMS UI Gothic サイズ10(行高12)の場合、3929行までのシートは正しく設定されますが、これより1行でも多いと一律10%になってしまうことがわかりました。 行高が大きいともっと少ない行数でそうなるようです。 これはエクセルの、「拡大縮小印刷」機能の限界なのでしょうか?それとも何かやり方があるのでしょうか?

  • エクセル:ヘッダフッタの設定

    二つほど質問があります。 1: エクセルで、紙を横にして印刷するドキュメントを作りました。 そこにヘッダーとフッターを入れるのですが、 別ファイルとして作っているものは、全て縦印刷なので、それにあわせたいのです。 本文(文字列・表)は横向き、しかしヘッダーフッターは縦向き印刷したときと同じになるような設定は出来ますか? 2: エクセルシートのそれぞれの縮小率が違う為、 同じポイント数でヘッダー等は打ち込んでいるので、縮小されている物は、実際に見える文字は小さくなってしまい、シート毎でまちまちになっています。 縮小率は違えど、同じ大きさで表示する(印刷できる)機能はありますか? 縮小率から、ポイント数を大きく打ち込み、同じ大きさに見えるように調整するしかないのでしょうか。 (例えば80%・100%の縮小率なら、12.5ptと10ptで同じ大きさに見える、というような) イメージ図がないので、わかりにくい説明文で申し訳ありません。

  • エクセル、拡大印刷のやりかた

    エクセルについての質問です。 作成した表を作って、それをA4用紙にめいっぱい 大きく印刷したいのです。 自分では、印刷設定で縮小/拡大を変えるしか方法しかわかりません。 表がA4サイズよりも大きく作ってあれば「次のページ数にあわせて印刷:横1枚×縦1枚」から自動縮小できますが、A4よりも小さい場合の、ページサイズいっぱいまでの「自動拡大」の方法はありますか? よろしくお願い致します。

  • Excel 2007の印刷書式設定について

    Excel 2007でワークシートに挿入した描画が印刷されない。 会社でOffice Personal 2007のExsel 2007を使っています。 そのExcel 2007でドキュメントを作成する際、ページ設定をA4横の設定にして、ドキュメントを作成し、そのワークシート内に写真や、描画を挿入し、印刷を行おうと印刷プレビューで印刷状態を確認して、いざ、印刷実行をすると、挿入した写真は、印刷されるのですが、一緒に挿入した描画が全て印刷されず、消えたような状態となります。 ちなみに、ページ設定上の問題かな、と思い、作成した、A4横のドキュメントを印刷実行する際に、印刷方向の向きを、A4縦に変えたところ、今度は、印刷プレビューの通りに印刷できました。 ちょっと、きつねにつままれたような感じです。 Excel 2007の何か、トラブルでしょうか。 原因が、分からずに居ます、何方か、対処方法の分かる方、いらっしゃいますでしょうか。 サポートをお願いします。

  • エクセルの書式設定

    ワードや一太郎などは書式設定(A4用紙)は解るのですがエクセルの書式設定が解りません 表を作成したのですが画面(モニター)にチャント収まるサイズで作成したのですがプリントすると大き過ぎたのか中途半端に2枚目の用紙にわたって印刷されます プリント時にサイズを縮小してもうまくサイズが調整出来ません どのように設定すれば良いのでしょうか 仮に今、作成しているものはまた一から作成し直さないとダメでしょうか

  • エクセルの用紙サイズ変更について

    エクセルの用紙サイズ変更について エクセルで、商品管理をする為に表を作成(1つの商品に対して1つの表=1ページ)し、名前毎(「あ行」なら「あ行」のシートに・・・)という風に「わ行」までワークシートを10件作成しています。 ちなみに基本の表を各シートに貼り付けていきましたので、行の幅などは全て同じです。 もともと用紙をA4サイズで作成していたのをB5サイズに変更したいのですが、シートを一括して変更する方法を知らずに、各シートごとにページ設定で変更しました。変更方法は【ページ設定】の【用紙サイズ】でA4をB5にし、【拡大/縮小】は100%のままです。そうすると、10のシートの内、8つは上手くいった(1ページに表がきっちり収まる)のですが2つのシートだけ、表がはみ出てしまいます。結局、その2つのシートだけは【拡大/縮小】をA4からB5の86%にしないと収まりませんでした。 そのままで特に問題なく使えるので、よいのですがなぜこんな事になるのか知りたいのです。 どうかよろしくお願いいたします。 ワークシート

  • ExcelでA4→B5変換

    現在Excel2003でとてもこまっています。 Excelで、賞状をリストから自動作成するものを作ったのですが、 (仕組みはSheet1に印刷用の賞状を作成し、Sheet2にリストを作成。Sheet1から=(Sheet2!A2)でSheet2を呼び出して名前などを反映しています。印刷はマクロでリストのあいてるセル、あいてないセルを自動判断してあいてないセルのぶんのみ印刷) 急きょ印刷する用紙がB5になりとてもこまっています。もとはA4で作ったので、B5にするとどうしてもおさまりきれません。(ページ設定で、拡大縮小で縮小しても、A4→B5倍率が87・・・パーセントで、87に設定しても、100枚ほど印刷するものなので、シートのしたのほうにいくとずれがかくせなくなります) 一度全て消して、またやりなおすと100枚なので相当時間がかかってしまい、到底できそうもありません。 なので、そのまま印刷する方法や(PDFなどに変換しないで)、VBAを使ってA4→B5が出来る方法があったら教えてください。お願いします。 Office 2007も所持しているので、そっちで方法があったら2007でもいいです。

専門家に質問してみよう