列と行を単一の列に転置/変換する方法は？

Excelワークシートを使用すると、この問題が発生することがあります。ある範囲のデータをXNUMXつの列に変換または転置するにはどうすればよいでしょうか。 （次のスクリーンショットを参照してください:)ここで、この問題を解決するためのXNUMXつの簡単なトリックを紹介します。

式を使用して、列と行をXNUMXつの列に転置/変換します

Kutools for Excelを使用して、列と行を単一の列に転置/変換します

VBAコードを使用して列と行を単一の列に転置/変換します

式を使用して、列と行をXNUMXつの列に転置/変換します

次の長い数式は、データの範囲を列にすばやく転置するのに役立ちます。次のようにしてください。

1.まず、データ範囲の範囲名を定義し、変換する範囲データを選択し、右クリックして選択します 名前を定義する コンテキストメニューを形成します。 の中に 新しい名前 ダイアログボックスで、必要な範囲名を入力します。 次に、をクリックします OK。 スクリーンショットを参照してください：

2.範囲名を指定した後、空白のセルをクリックします。この例では、セルE1をクリックして、次の数式を入力します。 =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1).

Note: MyData は選択したデータの範囲名です。必要に応じて変更できます。

3.次に、エラー情報が表示されるまで、数式をセルまでドラッグします。 範囲内のすべてのデータがXNUMXつの列に置き換えられました。 スクリーンショットを参照してください：

Kutools for Excelを使用して、列と行を単一の列に転置/変換します

数式が長すぎて覚えられない可能性があり、VBAコードにはいくつかの制限があります。この状況では、心配しないでください。ここでは、より簡単で多機能なツールを紹介します-Kutools for Excelそのと Transform Range ユーティリティ、そしてあなたはこの問題を素早くそして便利に解決することができます。

後 無料インストール Kutools for Excel、以下のようにしてください：

1.移調する範囲を選択します。

2。 クリック クツール > Transform Range、スクリーンショットを参照してください：

3。 の中に Transform Range ダイアログボックスで Range to single column オプション、スクリーンショットを参照してください：

4。 次に、をクリックします OK、およびポップアウトボックスからの結果を配置するセルを指定します。

5。 クリック OK、および複数の列と行のデータがXNUMXつの列に置き換えられました。

列を固定行の範囲に変換する場合は、 Transform Range 迅速に処理する機能。

VBAコードを使用して列と行を単一の列に転置/変換します

次のVBAコードを使用して、複数の列と行をXNUMXつの列に結合することもできます。

1。 押さえつける Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール、次のコードをに貼り付けます モジュール 窓。

Sub ConvertRangeToColumn()
'Updateby20131126
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3。 押す F5 キーを押してコードを実行すると、変換する範囲を選択するためのダイアログが表示されます。 スクリーンショットを参照してください：

4。 次に、をクリックします Ok、および結果を出力する単一セルを選択するための別のダイアログが表示されます。スクリーンショットを参照してください。

5.そしてクリックします Okすると、範囲内のセルの内容が列のリストに変換されます。スクリーンショットを参照してください。

関連記事:

Excelで行を列に変更するにはどうすればよいですか？

Excelで単一の列を複数の列に転置/変換する方法は？

列と行を単一の行に転置/変換する方法は？