• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:エクセル フォントサイズ変更)

エクセルでフォントサイズを自動で変更する方法

ham_kamoの回答

  • ham_kamo
  • ベストアンサー率55% (659/1197)
回答No.3

No.2です。すみません、1シート目と2シート目が逆でしたね。 それで、うまくいかないとのことですが、まず前の回答の > 2シート目のシートタブを右クリックして「コードの表示」を選択すると、 この部分が、「1シート目のシートタブを」になります。文字を入力するシートです。 それから、VBAの修正点ですが、4行目の、 If T.Address(False, False) <> "B2" Then Exit Sub ここの B2 を、1シート目の文字を入力するセル番地に書き換えてください。 そしてその次の行の、 With Worksheets("Sheet1").Range("A1").Font の Sheet1 を、印刷するシート名(2シート目のシート名)に変えて、さらに A1 の部分を、フォントサイズを変えたいセル番地に変えてみてください。 うまくいかないようでしたら、また補足をお願いします。

sd3746
質問者

お礼

すいません。補足の質問で、3シート~4シートへの部分はできました。 先程やってみてならなかったので質問したのですが、シート名が間違っていたようで、直したらできました。 その他の2つの質問についてご回答いただければうれしいです。 よろしくお願いします。

sd3746
質問者

補足

早々のご回答ありがとうございます。 B2のセルはうまくいきました。 他のどのセルも対応するようにするにはどのようにすればいいのでしょうか? また、3シート~4シートも同じようにしたいのですが、シート名の部分をかえるだけでいいのでしょうか? それから、入力したシートの文字も変えることはできますか? いくつも質問してすいません。できる部分だけのご回答でかまいませんので、よろしくお願いします。

関連するQ&A

  • ラベルフォントサイズの自動変更

    .net2003にて開発しています。 ラベルに表示する文字数によってフォントサイズを変更し、 常に全体を表示させたいと考えています。 Excelで言うところの 「縮小して全体を表示する」 の機能を実現したいのですが、良い方法はありますでしょうか?

  • Excelでセルのフォントを自動で変更したい

    Excelで罫線でかこまれた用紙に印字する際、下記のようなことができると作業が楽になります。 シート1には印刷用フォーマット(行幅列幅ともに固定)があり、シート2には(VLOOKUPでシート1の該当セルに参照されるための)データが入っています。 例: シート2のA1(製品名)の内容はシート1のA1にVLOOKUPで参照されるとして… シート2のA1に入れた文字数が既定を超えると、文字が切れた状態で印字がなされます。 現在はそれを避けるために、文字が収まるOR収まらないの判断を(当たりまえですが)人の目でおこなっています。 シート2で入力後にシート1を開いてその都度フォントサイズを変更して印刷。 入力→人間の目で判断→フォントサイズの変更→印刷、入力→また人間の目で判断→フォントサイズの変更→印刷、入力→またまた人間の目で・・・の繰り返しです。 作業効率のわるさを感じますし、印刷用のフォーマット(シート1)とデータ入力(シート2)が別々なので、シート間を行き来するのも手間なのです。 入力した桁数が既定を超えたとき、列幅や段組を変えずにフォントサイズだけを小さくし、次に既定内の文字が入ったときはそれに対応するフォントになる、というようなことを自動でおこない、現在の当たりまえを変えたいのです。 半角を1単位=1桁 例: シート2のA1(製品名)の内容はシート1のA1にVLOOKUPで参照されるとしてシート1のA1のフォントサイズが 【例 1】25桁以下ならフォントサイズ16 【例 2】26桁以上30桁以下ならフォントサイズ14 【例 3】31桁以上ならフォントサイズ12 というような設定を自動でおこなうことは可能でしょうか。 過去の質問も検索しましたが、さがし方がうまくないようで、道に迷いこの時間です…。 VBAのことはよくわかりません。 が、この作業が楽になるならAlt+F11で貼り付けますので、よろしくお願いします。

  • 文字数に応じてfont-sizeを自動変更

    エクセルのセルの書式の中にある「縮小して全体を表示する」の様な ことをしたいのです。 具体的にはtableの固定幅セルのfont-sizeを、文字数に応じて自動的に 設定して、セル内で折り返しが発生しないようにしたい。 といっても、そんなに厳密でなくてもいいので、 「文字数が○文字未満ならfont-size:normal、以上ならsmall」 程度でいいんですが、これをCSSのみかCSS+JavaScriptで 実現できないものでしょうか。 文字数に応じて<td>のclassを変えればいいのでしょうが、 できれば、テキストの修正をすれば自動的に変わる様にしたいです。

  • エクセル グラフのフォント既定値の変更をしたい

    エクセルのグラフシートのフォントの既定値だけを変更することは可能でしょうか? 具体的には、データラベルのフォントの自動サイズ調整のチェックをはずしたいのです。 今作成しているグラフは、系列が50以上あるため、いちいちデータラベルをクリックして書式設定ウインドウから選択しなければならず非常に面倒です。 フォントの大きさはブックの「標準フォント」を反映しているようですが、できればこの「標準フォント」は変更せずに、データラベルのフォントの大きさの既定値だけ変更できればなお幸せです。

  • ActiveReport中のフォントサイズ変更

    ActiveReportの中で、文字数によってフォントサイズを変更したいのですが、どこに値をセットすればフォントサイズが変更できるか教えて下さい。

  • ラベルのフォントサイズの変更

    VB.NETでラベルを動的に作成して、 ラベルのフォントサイズを変更したいのですが、 どうやって設定するか分かりません。 (オブジェクト名).Font.sizeはReadOnlyのようですし どなたかご教授いただけないでしょうか? ラベルを作成する部分は問題ないのですが、変更のやり方 が分かりませんどうかよろしくお願いします。

  • フォントサイズ変えたら、文字数行数がおかしく

    マイクロソフトのワードを使って、レポートを書いています。 1ページの設定が、1行25文字。1ページ40行になるように、という指定があります。 これまで、それで問題なくやっていました。 変更がありました。  「あ。でも12ポイント以上の文字の大きさにして」、という新しい条件が付け加わりました。 指示にしたがって、ページ全体のフォントの大きさを10.5 から 12に変えました。 すると、自動的に 【1行22字 1ページも35行】になってしまいました。 今度はこの字数と行数を調節しようと「ページ設定」に行ったのですが、 そこをみると 【1行25文字 1ページ40行】 という設定になっていました。 文字の大きさ 文字数・行数設定 以上2つの条件を同時に満たすためには、どうしたらよいでしょう??

  • Word2003でフォントサイズ変更のショートカットキーはある?

    Word2003でフォントサイズをキーボードのショートカットキーで変更することはできますか(マウスでフォントサイズの数字をクリックするのが面倒なので)?

  • Dreamweaver CS5.5 フォントサイズ

    Dreamweaver CS5.5を使い始めたのですが、フォントサイズの変更方法がわかりません。 ページプロパティから変更出来るのはわかるのですが、ページ全体が変更されてしまい、一部分だけ変更したい場合、どうすればよいのかわかりません。 フォーマットで見出し 1などに切り替えても全体が変わってしまい、マニュアルを見てもわからず質問させて戴きます。 例えば1行ごとに文字サイズを変更するにはどのような手順で操作すればよいのでしょうか?

  • フォントのサイズ変更

    今無料ソフトで日記をつけているのですが、本文中の文字のサイズを一部だけ大きくする方法について <FONT size="1"> などで変更するようにとアドバイスが載っていましたが、この<FONT、、、をどこでどうやって入力して文字を変更するのかわかりません。 パソコン初心者なもので恥ずかしい質問かもしれませんが、よろしくお願いします。