ボニーは、ファイルをExcelにインポートするときに発生する一般的な問題について説明しました。インポートされるファイルはスキャンされたテキストファイルであり、インポートは1つの小さな不具合で問題なく実行されます。元のドキュメントでラップされたテキストがあった1つの列で、テキストはワークシートの複数の行を占めるようになりました。ボニーは、これらの行を結合してその列の単一のセルに戻す方法を探しています。

これを行うにはいくつかの方法があります。これをあまり頻繁に行う必要がない場合は、定型的なアプローチが最適な場合があります。アンパサンド（＆）を使用して、結合する行の内容を連結します。

=C6 & " " & C7 & " " & C8 & " " & C9

その結果、すべてのテキストが1つのセルに結合されます。この結果をクリップボードにコピーしてから、[形式を選択して貼り付け]を使用して、必要な最終セルに配置できます。最後に、不要になった元の複数の行を削除できます。

このタイプの連結を数回以上実行する必要がある場合は、単純なマクロが役立つ場合があります。

Sub Combine()

Dim J As Integer

If Selection.Cells.Count > 1 Then         For J = 2 To Selection.Cells.Count             Selection.Cells(1).Value = _               Selection.Cells(1).Value & " " & _               Selection.Cells(J).Value             Selection.Cells(J).Clear         Next J     End If End Sub

このマクロを使用するには、連結するセルを選択してから、マクロを実行します。すべてのセルの内容が選択範囲の最初のセルに結合され、他のセルにあるものはすべてクリアされます。

マクロは行を削除しません。それはあなたに任されています。ただし、マクロにショートカットキーを割り当てると、コンテンツがすばやく結合されます。

注：

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

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

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

このヒント（2417）は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link列内の複数の行の結合。