フォントサイズが揃わない

質問

Excelで表作成しているのですが、書式設定で年、月、日、曜日を設定して入力していくとセルによりフォントサイズが揃わない所が出てきて困っています。なのでその列すべて選択してフォントサイズを選んで変えるも変化せずどうしたら揃うのか教えていただきたく思います。宜しくお願いします。
縦に2列（A,B)に同じ書式設定をしています。A列は同じフォントサイズで表示されています。

回答No.3

okok456 · ベストアンサー

何かが違うのでしょうね
・フォントの種類が統一されていない？
　添付画像はフォントサイズ48で　フォントはMS P明朝、MS明朝、IPA明朝にしてみました。
・「縮小して全体を表示する」の設定になっている？
https://www.wanichan.com/pc/excel/2016/2/39.html

A列をコピーし「書式」をB列に貼り付けも
https://allabout.co.jp/gm/gc/386795/

列幅を自動調整してもよいかも
http://www4.synapse.ne.jp/yone/excel/excel_waza/waza_syosiki_11.html

お礼

有難う御座いました。お返事頂いた方々の指摘を参考にして色々試した結果一様不揃いの
列のフォントサイズが揃いました。揃っている列のフォントサイズとは違いますがこれで
いいかなと、A列がサイズが10でB列が9なのでぱっと見列が揃ったのでこれで行こうと
思っています。不揃いの列を選択してフォントサイズ10を選んで10の下にあるAフォント
サイズ縮小をクリックしたら9のサイズで揃いました。ちなみにフォントサイズ10以外も
試しましたが揃いませんでした。お手数をおかけしました。
列幅、フォント、コピ‐も試して見ました。有難う御座いました。

回答No.4

imogasi

私も「縮小して全体を表示する」の設定を疑う。
ＶＢＡはやったことないかもしれないが、
下記だけなら、言う通りやればよい。
標準モジュールに、下記コードをコピペ。
Sub test01()
Set sh1 = Worksheets("Sheet1")
Set sh2 = Worksheets("Sheet2")
j = 2
For Each cl In sh1.Range("A2:A12")
sh2.Cells(j, "A") = cl.Font.Size
If cl.ShrinkToFit = True Then sh2.Cells(j, "B") = "True"
j = j + 1
Next
End Sub
ーー
データはＳｈｅｅｔ１のＡ２：Ａ12にあるとして、
Ｓｈｅｅｔ２は白紙の場合、実行後はＳｈｅｅｔ２のＡ列にフォントサイズとＢ列に「縮小して・・」の場合はＴＲＵＥが出るから、可視化して見られるよ。
結果は
11
11
14 TRUE
11
11
11
11
11
11
11
11
私の例の場合はＡ４が
14 TRUE
なのだが、見た目は文字が小さく見えるが、サイズは元のまま。ホーム画面でＡ４のサイズは１４のまま。だからシートで確認しても、変えて無ければ、他と同じ１１のままで、「全体を・・」設定すると他と同じフォント・サイズながら、（その１セルのセル文字数が多いと）見た目は小さく見えるようだ（？？）。
参考に。

お礼

有難う御座いました。お返事頂いた方々の指摘を参考にして色々試した結果一様不揃いの
列のフォントサイズが揃いました。揃っている列のフォントサイズとは違いますがこれで
いいかなと、A列がサイズが10でB列が9なのでぱっと見列が揃ったのでこれで行こうと
思っています。不揃いの列を選択してフォントサイズ10を選んで10の下にあるAフォント
サイズ縮小をクリックしたら9のサイズで揃いました。ちなみにフォントサイズ10以外も
試しましたが揃いませんでした。お手数をおかけしました。有難う御座いました。

回答No.2

kkkkkm

フォントによってはPが付くフォントだとそろわないものがでてきます。
A,Bともに同じ日付が入っているならまた話が違ってきますが。

回答No.1

Kaneyan-R

セル幅が足りていなくて、自動縮小されているって事はないですか？

お礼

有難う御座いました。お返事頂いた方々の指摘を参考にして色々試した結果一様不揃いの
列のフォントサイズが揃いました。揃っている列のフォントサイズとは違いますがこれで
いいかなと、A列がサイズが10でB列が9なのでぱっと見列が揃ったのでこれで行こうと
思っています。不揃いの列を選択してフォントサイズ10を選んで10の下にあるAフォント
サイズ縮小をクリックしたら9のサイズで揃いました。ちなみにフォントサイズ10以外も
試しましたが揃いませんでした。お手数をおかけしました。有難う御座いました。