[[20070125204819]] 『フォントサイズを自動で変更したいのですが』(こう) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『フォントサイズを自動で変更したいのですが』(こう)[エクセルのバージョン]Excel2000 [OS]Mac OS9
 入力用シートにあるリストを、出力用シートに作成したカレンダーの中に表示したいのです。
この時にセルに入りきらない場合のみフォントサイズを下げる事は出来ますか?

 入力用シート 
  A列  B列
1行 1  生姜焼きとみそ汁
2行 2  クリームシチューと大根のサラダ
3行 3  ハンバーグ

 出力用シート
   A列    B列   C列  ・・・ G列
1行  日    月    火  ・・・ 土
2行  1     2    3   ・・・ 7
3行 生姜焼き クリーム ハンバー       3,4,5行は結合してそれぞれ
4行 とみそ汁 シチュー グ          一つのセルにして、
5行      と大根の            全体を折り返して表示しています

 2日のようにセルに入り切らない場合のみ、フォントサイズを変えたいのです。
全体を縮小して表示にしてしまうと、1行で表示されてしまい文字が小さすぎるのです。

 よろしくお願いします。


 >セルに入り切らない場合
 セル幅は固定だと思いますので、LEN関数を使用して文字数に応じて
 条件付書式を使用するとかはいかがでしょうか?
 但し、3条件までしか設定できませんけど…(^_^;)

 (Ohagi)

 回答ありがとうございます。

 >条件付書式を使用するとかはいかがでしょうか?
 条件付書式ではサイズを変更する事が出来ないのですよね?
 どういうふうに設定すれば良いでしょうか?

 (こう)

 はっ(@_@;)
 文字サイズはグレーアウトで選べませんでしたね…
 失礼しました(^_^;)

 (Ohagi)

 内容から推測しますと、↓へ別投稿されたのでしょうか。
[[20070126143736]] 『セルの文字を自動でフォントのポイント変える方法』(わあい) 
確信が持てませんので、こちらへ投稿します。
「折り返して表示」と「自動フォントサイズ調整」の両立にムリあり。
「何文字ならどれくらいのフォントサイズにすれば収まるか」
は、マクロででも難しそう。
 
「入力用」という名前のシートのB列1行目から参照するとします。
一行の最小表示文字数は4文字とします。
2行目の日付と思しき数値を行インデックスとして利用します。
3,4,5行は結合解除。
各セルの書式設定>配置は「縮小して表示」とします。(印刷時もその方が便利)
A3〜A5にそれぞれ次の式を入力。

A3
=MID(INDEX(入力用!$B:$B,A2),1,4+(LEN(INDEX(入力用!$B:$B,A2))>12)*ROUNDUP((LEN(INDEX(入力用!$B:$B,A2))-12)/3,0))

A4
=MID(INDEX(入力用!$B:$B,A2),5+(LEN(INDEX(入力用!$B:$B,A2))>12)*ROUNDUP((LEN(INDEX(入力用!$B:$B,A2))-12)/3,0),4+(LEN(INDEX(入力用!$B:$B,A2))>12)*ROUNDUP((LEN(INDEX(入力用!$B:$B,A2))-12)/3,0))

A5
=MID(INDEX(入力用!$B:$B,A2)&REPT(" ",10),9+(LEN(INDEX(入力用!$B:$B,A2))>12)*ROUNDUP((LEN(INDEX(入力用!$B:$B,A2))-12)/3,0)*2,4+(LEN(INDEX(入力用!$B:$B,A2))>12)*ROUNDUP((LEN(INDEX(入力用!$B:$B,A2))-12)/3,0))

 これらを必要範囲へコピペで表示できると思います。
(ただし、全角文字入力、ご提示のレイアウト通りであることが前提です)
(みやほりん)(-_∂)b

 返事が遅くなってすみません。
[[20070126143736]] 『セルの文字を自動でフォントのポイント変える方法』(わあい) へ別投稿はしていません。

 教えて頂いた関数を使ってみたのですが、一行の文字が小さく、行間が妙に空いてしまってみづらいです。
別に4行になっても構わないので、枠内に入れば良いのですが・・・。
やっぱり難しいのですね。一つ一つ手作業で変えていきます。

 ありがとうございました。
(こう)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.