質問: エクセル関数について(フォントサイズ変更) フォントサイズを10に設定していたとします。 セルに「ああ」文字を2文字入力した場合、フォントサイズは設定のままで、「あああ」と3文字入力した場合、フォントサイズを8にしたい時は、どのようにすればいいのでしょうか。 よろしくお願いします。
回答: フォントサイズの自動変更はvba(マクロ)しかありません。 一例です。 仮にa1:a5範囲で3文字以上入力されたらフォントサイズを変更します。 (1)対象シートタブを右クリック→コード表示→以下のコードを貼り付け→vbe終了 private sub worksheet_change(byval target as range) on error goto error if intersect(target, range("a1:a5")) is nothing then exit sub if len(target.value) >= 3 then target.font.size = 8 error: end sub