web-dev-qa-db-ja.com

Excelでセルを折り返したテキストの内容に合わせて自動的に高さを調整する方法を教えてください。

Excelで折り返されたテキストコンテンツを持つセルがあり、その高さが数行にまたがるコンテンツに合うように調整されるようにセルをフォーマットしたいと思います。どうすればこの動作を実現できますか?

22
Manga Lee

から http://support.Microsoft.com/kb/149663

セル内のすべてのテキストに合わせて行の高さを調整するには、以下の手順を実行します。

行を選択してください。

Microsoft Office Excel 2003およびそれ以前のバージョンのExcelでは、[書式]メニューの[行]をポイントし、[自動調整]をクリックします。

Microsoft Office Excel 2007にホームタブをクリックしCellsグループでフォーマットをクリックして、AutoFit Row Heightを次にクリックします。

すべての行が選択されているときも機能します。

24
vaichidrewar

やってみる

列を選択します - >列を右クリック - >セルの書式設定 - >配置タブ - >テキストを折り返す

10
hyperslug

自動調整は結合セルでは機能しません。手動でそれをしなければなりません。

このMicrosoftの回答を参照してください。

Excelの結合セルを含む行または列に自動調整機能を使用することはできません

4
abruti

自動的に行かない場合は、カーソルを行番号の間の小さな行(例:1と2の間)に合わせてダブルクリックすると、行のサイズが変わります(例では1)。すべてが見えるように(垂直方向から)。

2
Lance Roberts

範囲内(B2:B1500)にあるセルの場合、ヘッダー行のサイズを変更するために次のVBコードを作成しました。タイムシートは、2015年の第1週に入ります。

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim KeyCells As Range

    ' The variable KeyCells contains the cells that will
    ' cause an Action when they are changed.
    Set KeyCells = Range("B2:B1500")

    If Not Application.Intersect(KeyCells, Range(Target.Address)) _
           Is Nothing Then

        ' Change the height of the header row when one of the defined cdlls is changed
        Rows("1:1").EntireRow.AutoFit

    End If
End Sub
0
Mickg01

あなたはマクロを知っていますか?次のコードを

Application.ActiveCell.WrapText = True

worksheet_SelectionChangeサブルーチン内。

0
Toc

VBAによる解決策は、次のものを使用することです。

 Call Application.ActiveCell.AutoFit
0
richardtallent

期待通りに動作させることができる唯一の方法は、CTRL-Aでシート全体を強調表示し、ツールバーの「テキストを折り返す」ボタンをクリック解除してから再度選択することです。他の設定は変更されていませんが、各行はその内容に対して「適切な」高さになりました。

0
simpleuser