• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excelマクロ・行の高さを自動調整したい)

Excelマクロ・行の高さを自動調整する方法

real beatin(@realbeatin)の回答

回答No.2

#1です。 こちらで書き漏れていたことがあるので追記します。 既に [折り返して全体を表示する]が適用されている場合は、   Rows(5).AutoFit ' 5行め の場合 とか、   Rows("5:8").AutoFit ' 5:8行め の場合 とか、   Range("5:5,7:9").EntireRow.AutoFit ' 5行めと7:9行め の場合 のような行オブジェクトに対する処理も可能ですし、薦める人も多いと思います。。   Rows(5).WrapText = True 等の#1の記述は、 .WrapText = True が設定してあるかどうかを問わずに(再設定かどうかに関係なく) [折り返して全体を表示する]を設定し行高を調整してくれる記述、ということです。 因みに、これらの記述は、例えば列の幅を狭めた後、にも有効です。 追加補足、以上です。

関連するQ&A

  • EXCELの「行の高さ」の自動調整について

     EXCEL2013を使っています。  EXCELでセルの配置を横位置:標準、縦位置:下詰め、「折り返して全体を表示する」と設定してあります。  添付図のような場合で行の高さを自動調整したとき、行の高さは、 第1行: 全セルで字数が各列の幅以下なので高さは1行分 第2行: B,C列で字数が列幅を超えているので高さは2行分 となっていますが、 第3行: C列では字数が列幅ギリギリですが改行は入っていません。  それなのに行の高さの自動調整を行うと高さは2行分となってしまいます。改行がないのにあたかも改行が入っているかのように行を余分にとってしまっているわけです。  このような場合1行だけになるように自動調整する方法はないものでしょうか、お伺いします。手操作で調整すればよいのですがデータ量が大変大きくて作業が大変です。  なお、これまでの経験では、ワークシートの上では1行でも、印刷すると2行になっていることがありましたが、今回の場合、印刷メニューで印刷画面を見ると改行は入っていませんし、行の高さは2行となっています。(実際の印刷は実行していません。)

  • EXCEL の行を自動調整にしているのに・・・

    EXCEL で表を作っています。各項目で文の長さがバラバラで、行を「自動調整」にしています。それが、あるときから、なぜか最後の行だけ半分ほど隠れてしまい、表示および、印刷がされなくなってしまう行がでてきました。なぜでしょう??

  • 列の高さを自動調整できるマクロ?

    ■顧客情報一覧のシートと、 顧客情報→個人の顧客を閲覧するシートがあります。 マクロを起動すると、 「一覧」に入力をしてある顧客の行動経歴が、 「閲覧」のシートのセルに反映するようになっています。 ■入力してある行動履歴は、顧客によって、その長さが違います。 ある顧客は、30数行にも渡る長さですが、 べつの顧客は1行しか行動履歴がありません。 その「情報量」に応じて、「行の高さ」が全て表示されるように自動調整してくれるマクロをくみたいと思っています。 どのようにしたらよいのか‥ アドバイスをよろしくお願いいたします。

  • Excel97で自動的に行挿入させるマクロのつくりかた。

    こんにちは。 マクロ超超初心者です。 WN98SE、Excel97です。 やりたいことは、たとえば、 B1に1001 B2に1001 B3に1002 B4に1003    ・    ・    ・ と入っていたとします。 ここで、1001から1002に変わる(又、1002から1003に変わる)とき、その間の行に3行空行を自動的に挿入させたいのですが、どういうマクロの記述をすればできるのでしょうか・・・。 それを新規ブックでもボタンひとつで実行させるにはどのような設定をしたらよいでしょうか。 どなたか教えてください。 よろしくおねがいします。

  • エクセルマクロ 印刷「105~110」などの自動連続印刷の仕方

    エクセルです。今、Vlookup関数で別のシートから呼び出して表示しています。例えば、シート1のA4に「101」と入力するとシート2を参照してデータをもってくるようになってます。 そして、102、103~と打つことによって変化していきます。 また、 101~131まで、一気に自動印刷するマクロはできました。 同様に、 201~231まで、一気に印刷するマクロはできました。 そこで、教えて欲しいのです。 105~110など途中のところを連続印刷するためのマクロはどのようになりますか。 もちろん、105~110などと打つセルをつくる必要はあると思いますが・・・。お願いしますm(_)m

  • エクセルで行の高さ

    WINDOWS XP(Home Premium)でExcel2003を使用しています。 300行のデータに対し、エクセルで行の高さの自動調整をしました。 しかし、高さが一部不充分であり、印刷されると不備が多々あります。 行の高さを  「メニュー・書式(O)→行(R)→自動調整(A)」でおこなわれる高さの 1.2倍~1.5倍くらいの高さにしたいのですが良い方法はありませんか? おそらくマクロやVBAを使えば可能なんだろうなとは思いながら、 コマンドのことやプログラムを組み立てる知識が無いので、 VBAにこれを貼り付けろ、という提案を頂けたらすごく助かります。 よろしくお願いします。

    • ベストアンサー
    • Mac
  • エクセルで、行の高さの自動調整が出来ません

    セルの書式設定で、 折り返して表示させた場合や、 Alt+Enterキーで改行させた場合、 行の自動調整が出来ません。 正確に言えば出来る時と出来ない時があります。 セルの結合などは行っていなくてもそうなります。 OSはMeです。 ご存知の方、教えてくださいね。

  • 【エクセル】 結合セルで行の高さを自動調整する方法

    通常、セルに多数の文字を書き込んでも列幅を変更 したくないときには、セルの書式設定で 「折り返して全体を表示する」 としておけば、列幅を広くすることなく、行の高さ が自動調整されます。 これを、結合セルでやろうとするとどうしても 自動調整してくれません。 結合セルでも、行の自動調整機能が働く方法を 教えてください。 よろしくお願いします。

  • エクセルでマクロを自動的に実行

    表題の通りなんですが、エクセルで、あるセルに指定された数値(語句)が入った場合に、それを自動的に感知して実行するマクロがあればと思うのですが、そういったことってできるのでしょうか。 具体的には、  1、バーコードリーダーで数値をセルに入力  2、その数値に対応する名前をvlookup関数にて表示  3、その名前が入力された時点でマクロが自動的に実行 と言うものです。  3の部分がよく分からずに困っています。できるかどうか分かりませんが、もしできるようであるならその方法を教えていただければありがたいです。どうか、よろしくお願いします。

  • Excelで50行毎に改ページを入れたい

    表題を1行入れて1ページに49行となるように改ページを入れたいのですが、どのようなマクロを組めばできますか? また、行は49行の倍数と成るように印刷範囲を設定しして列は1ページに収まるように設定するにはどうしたらよいか併せて教えていただければ助かります。 例えば、349行 F列まである場合は、縦が7枚×横が1ページとなるように自動で設定したいです。