- ベストアンサー
エクセルで行の高さ
WINDOWS XP(Home Premium)でExcel2003を使用しています。 300行のデータに対し、エクセルで行の高さの自動調整をしました。 しかし、高さが一部不充分であり、印刷されると不備が多々あります。 行の高さを 「メニュー・書式(O)→行(R)→自動調整(A)」でおこなわれる高さの 1.2倍~1.5倍くらいの高さにしたいのですが良い方法はありませんか? おそらくマクロやVBAを使えば可能なんだろうなとは思いながら、 コマンドのことやプログラムを組み立てる知識が無いので、 VBAにこれを貼り付けろ、という提案を頂けたらすごく助かります。 よろしくお願いします。
- Mac
- 回答数3
- ありがとう数3
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
とりあえず、マクロ組んでみました。 行がいくつまであるかわからないので、必要な行数は調整してください。(MAXGYO=100という部分を変更) あと倍率についても、とりあえず1.5倍にしてありますが、必要なら「BAIRITU=1.5」という部分を変更してください。 これでお望みのことができるかと思います。 ---------------------------- Sub 行の高さの自動調整() '行の高さの自動調整 Cells.EntireRow.AutoFit '行を大きくするための倍率 BAIRITU = 1.5 '最終行の指定 MAXGYO = 100 '1行目から最終行目までを順番にチェックするために「IX」変数を使用する。 IX = 1 'IXが最終行以下の場合、この処理を続ける。 Do While IX <= MAXGYO Rows(IX).RowHeight = Rows(IX).RowHeight * BAIRITU IX = IX + 1 Loop End Sub --------------------------- 余談ですが、もしも文字がきれてしまったりするのならば、セルの書式設定の「文字を小さくして表示」というので代用できる場合があります。
その他の回答 (2)
- DAV
- ベストアンサー率37% (746/2009)
>ピクセル数で設定すると、複数行が同じ高さになってしまわないでしょうか? 多分大丈夫だったと思います。 済みませんが実際に試して見て下さい。
お礼
行によっては指定したピクセルでは高すぎたり、低すぎたり ということがありあまりうまくいきませんでした。 色々試してみたいと思います。 迅速にご回答いただいてありがとうございました。
- DAV
- ベストアンサー率37% (746/2009)
バージョンによって違うかもしれませんが、自動調整でなくピクセル数で指定できませんか?
補足
ご回答ありがとうございます。 提示した情報が不足しておりました。 現状では、文字数の多い行と少ない行とが不規則に混在している状態です。 ピクセル数で設定すると、複数行が同じ高さになってしまわないでしょうか?
関連するQ&A
- Excelマクロ・行の高さを自動調整したい
データベースから抽出したExcelの人材情報リストから、VLOOKUP関数で情報を射影して、指定した人材を数人分連続で印刷するマクロを設定して、定型のプロフィールシートを作成しました。 改良したい点として、人によって情報量が異なる項目があるので、特定の行(例えば5行目)の高さのみを自動調整するようにしたいのですが、どのようにすればよいでしょうか。 VLOOKUP関数を使用しているからか、書式から行の自動調整を設定してみても1行の高さになってしまいます。 マクロで一度に印刷できるようにしたので、一枚一枚レイアウトを修正しなくてもいいようにしたいです。 VBA初心者ですので、宜しくお願いします。
- ベストアンサー
- Visual Basic
- excelで行の高さを自動調整したのですが・・・。
こんにちは。mininiと申します。 早速ですが、上記質問のタイトルの件で困っています。 「折り返して全体を表示する」にしてから 自動調整したい行を選択して、書式→行→自動調整をしてみたのですが はみ出たままなのです(全体が画面に表示せれないのです)。 1列に2000行のデータを扱っており、1つ1つのセルの文字数はまちまちなので (妥協して)手動で調整するのもな~と、だらけておりました。。。 ちなみにバージョンはexcel97です。 皆様のお知恵をお借りしたいです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel 文字列の量に応じて行の高さを自動的に広げたい
Excel2003です 表の上のセルを結合して、「セルの書式設定」で「折り返して全体を表示する」をチェックし、数行に渡る文字列を入力したときに行の高さを自動的に広げる方法を教えてください。 行番号の下線のダブルクリック、書式→行→自動調整 等でも変更できません 手動で行の高さを変更する以外方法はないのでしょうか
- ベストアンサー
- オフィス系ソフト
- Excelのマクロで、開いた時に、行と日付が入るようにしたい
教えてください。WinXP、Excel2000を使って、A1に日付、B1に記録をつけていて、枠線で囲んで、毎日記録しているのですが、一回一回、行を挿入するのが大変なので、マクロもしくはVBAで、ファイルを開いた瞬間に、自動的に1行挿入され、かつAの列に、その当日の日付が入るようにするにはどうしたらよいでしょうか?
- ベストアンサー
- オフィス系ソフト
- Excel 複数行入っているセルの列の幅の自動調整
Excelのホームタブ/セルグループ/書式▼/列の幅の自動調整 で列の幅を自動調整したいのですが、 1つのセルの中に複数の行がある場合、うまくいきません。 例えば、A1のセルの中に、 AAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAA のように3行入っている場合など。 このような場合、どのようにすればよいでしょうか。 よろしくお願いします。 (Windows10,Excel2016)
- ベストアンサー
- Excel(エクセル)
- エクセル2010で、行ごとに連番を打つ方法は?
Excel2010 Ver14.0.6112.500(32bit版)を使っている者です。 表の行の必要な箇所に連続した番号(1,2,3・・・)を打つのに、今までは、その 必要な行の所定の欄ごとにカーソルを移動して、連番を打ってきました。 これが自動的にできると、あとから行を挿入したときなど、とても楽になるのです。 マクロの式かなにかで、そうして連続した番号を表示する方法はないでしょうか? エクセルのヘルプやビデオで探しましたが、私のキーワードが悪いせいか 見つからなかったので、どなたか教えて下さい。 なお、行をすれば、すなわち、不要な行をなくせばできるというので あれば、今からでも書式を変えます。そして連番ができるようにします。
- ベストアンサー
- その他MS Office製品
- エクセル マクロ 行 非表示
マクロについてご教授お願い出来ないでしょうか。 マクロ初心者です。 エクセル アクティブセル(ex A120セルやA20セル)の行から1行目までを非表示にさせるマクロがわかりません。 アクティブセルから下の行を非表示にさせるマクロは下記URLにて紹介がありましたが・・ https://www.relief.jp/docs/excel-vba-hide-below-active-cell.html また、もし可能でしたら、アクティブセルからA2行目までの非表示、つまり 1行目は残すマクロが可能でしたら、合わせてご教授どうぞよろしくお願い致します。
- 締切済み
- Excel(エクセル)
- エクセルの行の高さについて
Windows XPでMicrosoft Office Excel2003を使用しています。行の高さ13.5が基本設定になっているようですが、自由に変更する手はないでしょうか。その都度行の高さを設定すればよいのですが、セルの折り返し設定をして行の高さを自動調整にすると、折り返して行高さが広がった行以外がまた13.5に戻ってしまいます。この際に高さを20になるようにするにはどうすれば良いかということです。方法があれば教えて下さい。
- ベストアンサー
- その他(インターネット・Webサービス)
- EXCELの「行の高さ」の自動調整について
EXCEL2013を使っています。 EXCELでセルの配置を横位置:標準、縦位置:下詰め、「折り返して全体を表示する」と設定してあります。 添付図のような場合で行の高さを自動調整したとき、行の高さは、 第1行: 全セルで字数が各列の幅以下なので高さは1行分 第2行: B,C列で字数が列幅を超えているので高さは2行分 となっていますが、 第3行: C列では字数が列幅ギリギリですが改行は入っていません。 それなのに行の高さの自動調整を行うと高さは2行分となってしまいます。改行がないのにあたかも改行が入っているかのように行を余分にとってしまっているわけです。 このような場合1行だけになるように自動調整する方法はないものでしょうか、お伺いします。手操作で調整すればよいのですがデータ量が大変大きくて作業が大変です。 なお、これまでの経験では、ワークシートの上では1行でも、印刷すると2行になっていることがありましたが、今回の場合、印刷メニューで印刷画面を見ると改行は入っていませんし、行の高さは2行となっています。(実際の印刷は実行していません。)
- 締切済み
- Excel(エクセル)
- エクセルで同一データの行を自動削除するツールを作成したい
VBA、マクロ初心者です。 たぶんマクロではできないと思うのですが、エクセルにて同一データを持つ行を自動検索して削除していきたいのです。どのように作ればよいのか教えてください。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございます!! 見事に解決しました。 やはり、マクロやVBAが使いこなせると強力ですね。 改めて時間のあるときに勉強したいと思います。