【エクセル】 結合セルで行の高さを自動調整する方法

こんにちは。わたしの環境は Excel2000ですが、 標準の機能で自動調整はできないと思います。 マクロで実現するなら以下になります。 Sub Macro1() Dim rStart As Long Dim rEnd As Long Dim lHeight As Long Dim rRng As Range Set rRng = Selection With rRng If Not .MergeCells Or .Rows.Count = 1 Then Exit Sub .MergeCells = False With .Rows(1) rStart = .Row .EntireRow.AutoFit lHeight = .Height End With rEnd = rStart + .Rows.Count - 1 .MergeCells = True Range(Rows(rStar

[toowaki-fc2]

行の高さを自動調整するアドインを作成しました。 本アドインを使用することで、結合セルを含めた行の高さの自動調整が行えるようになります。また、印刷時に各セルの文末までを表示することもできます。 ぜひお試し