Excelでワークシート内にテキストボックスを作成できることはすでにご存知でしょう。ある時点で、特定のセルとまったく同じサイズのテキストボックスを作成する必要がある場合があります。作成するテキストボックスが1つか2つしかない場合、最も簡単な方法は次の手順に従うことです。

。リボンの[挿入]タブを表示します。

。テキストボックスツール（Excel 2007、Excel 2010、またはExcel 2013）をクリックするか、テキストツールをクリックしてからテキストボックス（Excel 2016以降のバージョン）をクリックします。

。 Altキーを押しながらクリックしてドラッグし、テキストボックスを作成します。

Altキーを押したままにすると、Excelはテキストボックスの側面を描画グリッドに「スナップ」します。これはたまたまワークシートのセル境界と一致します。結果は、正確に目的のサイズのテキストボックスになります。

これらのテキストボックスを一度に多数作成する必要がある場合は、グリッドへのスナップ機能を永続的にオンにすることができます。リボンの[ページレイアウト]タブを表示し、[配置]グループの[配置]ツールをクリックしてから、 [グリッドにスナップ]をクリックします。

作成するそのようなテキストボックスが多数ある場合は、さまざまなワークブックで、マクロを使用して目的のテキストボックスを作成できます。次のマクロは、選択したセルの真上にテキストボックスを作成し、選択したセルとまったく同じサイズになるようにサイズを変更します。

Sub TextBox2Cell()

With ActiveCell         ActiveSheet.Shapes.AddTextbox _           msoTextOrientationHorizontal, .Left, _           .Top, .Width, .Height     End With End Sub

マクロを少し変更するだけで、選択したセルの範囲と同じ大きさのテキストボックスを作成するように変更できます。

Sub TextBox2Selection()

If TypeName(Selection) = "Range" Then         With Selection             ActiveSheet.Shapes.AddTextbox _               msoTextOrientationHorizontal, .Left, _               .Top, .Width, .Height         End With     End If End Sub

テキストボックスの作成に使用するアプローチ（手動またはマクロ）に関係なく、列の幅または行の高さを変更してセルのサイズを変更すると、テキストボックスのサイズも新しいセルに一致するように変更されることに注意してください。サイズ。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link：/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（11359）は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link：/ excel-Sizing_Text_Boxes_and_Cells_the_Same [テキストボックスとセルのサイズを同じにする]。