web-dev-qa-db-ja.com

Excelで1つの行を複数の行に分割するにはどうすればよいですか？

Excelに製品データベースがあり、数百のエントリがあり、それぞれに標準、デラックス、プレミアムという1〜3の「階層」の価格設定があります。各階層には、独自のSKU（A、B、またはCが基本SKUの最後に追加されます）と価格があります。私のデータは次のとおりです：

Name, Description, Price A, Price B, Price C, SKU A, SKU B, SKU C
name1,      desc1,   14.95,   19.95,        , sku1A, sku1B, 
name2,      desc2,    4.95,    9.95,   12.95, sku2A, sku2B, sku2C
name3,      desc3,   49.95,        ,        , sku3A,      ,

データを次のようにするにはどうすればよいですか？

Name, Description,   SKU, Price
name1,      desc1, sku1A, 14.95
name1,      desc1, sku1B, 19.95
name2,      desc2, sku2A,  4.95
name2,      desc2, sku2B,  9.95
name2,      desc2, sku2C, 12.95
name3,      desc3, sku3A, 49.95

それが役立つ場合は、これらの製品をMagentoインストールにインポートします。

よろしくお願いします。

microsoft-excelmicrosoft-excel-2010csv
9
GreysonD

これらのタスクは通常、VBAを使用すると高速になります。実際、セットアップに10分ほどかかりました。
データが列Aから列Hにあると想定しています。

_Excel » Developer » Visual Basic_に移動します"左側のペインで_sheet1_（または）データが存在するシートを開きます"右側のウィンドウにコードを挿入します"コードを実行します

VBAコード

_1 |Sub NewLayout()
2 |    For i = 2 To Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
3 |        For j = 0 To 2
4 |        If Cells(i, 3 + j) <> vbNullString Then
5 |            intCount = intCount + 1
6 |            Cells(i, 1).Copy Destination:=Cells(intCount, 10)
7 |            Cells(i, 2).Copy Destination:=Cells(intCount, 11)
8 |            Cells(i, 3 + j).Copy Destination:=Cells(intCount, 12)
9 |            Cells(i, 6 + j).Copy Destination:=Cells(intCount, 13)
10|        End If
11|        Next j
12|    Next i
13|End Sub
_

説明

それをよりよく説明するために、コードをできるだけ短くすることが私の意図でした。基本的に、2つのループを使用します。外側のループ（i）は行用で、内側のループ（j）は価格列用です。

セルの読み取り/書き込みにはcells(rowNumber,columnNumber)を多用しています。

  • 2行目|行2から最後の行までループを開始します。使用されたすべての行を反復処理します

  • 3行目| 0から2までの2番目のループを開始します（実際には3つのループで、すべてのPrice列に1つ）

  • 4行目|この内部ループを使用して、現在の行と列の価格A、次に価格B、最後のループの価格Cの値をチェックします。価格列に値が見つかった場合は、セルをコピーします。 Priceが挿入されていない場合は、何もせずに次のPrice列に進みます

  • 5行目|カウンターをカウントアップして、すでにコピーした行数を確認します。
    これで、現在の行をコピーできる行がわかります

  • 6行目|名前列をコピーする

  • 7行目|説明列をコピーする

  • 8行目|現在の内部ループに応じて、価格AまたはBまたはC列をコピーします。

  • 9行目|現在の内部ループに応じて、SKU AまたはBまたはC列をコピーします

結果のスクリーンショット

enter image description here

8
nixda

これはワークシート関数ソリューションです。数式は少し密集しているので注意が必要ですが、これで十分です。

手順：

  1. 新しいテーブルの最初の行のNameの下に、データの最初のNameへの直接参照を入力します。この例では、=A2と入力します。ここで、A2はデータにリストされている最初の名前です。以下に示すスクリーンショットの例では、この数式はA8になります。以下のすべての数式は、スクリーンショットで使用されているレイアウトに従います。もちろん、シートに一致するようにすべての範囲参照を更新する必要があります。
  2. この下のセルに、次の数式を入力します。
     = IF（COUNTIF（$ A $ 9：A9、A9）= COUNTA（OFFSET（$ C $ 1：$ E $ 1、MATCH（A9、$ A $ 2：$ A $ 5,0）、0））、 INDEX（$ A $ 2：$ A $ 5、MATCH（A9、$ A $ 2：$ A $ 5,0）+1）、A9）
    これは基本的に、上記の名前（A9内）に必要な行数をチェックし、新しいテーブルに既にある行の数がこれと一致する場合は、次の名前に移動します。そうでない場合は、上記の名前の別の行が追加されます。
    この式を必要な範囲まで入力します（名前ではなく0が返されるまで）。
  3. Descriptionの下の最初の行に、次の数式を入力して入力します。
     = INDEX（$ B $ 2：$ B $ 5、MATCH（A9、$ A $ 2：$ A $ 5,0））
  4. SKUの下の最初の行で、次の数式を数式バーに貼り付けて、 Ctrl+Shift+Enter。
     = INDEX（OFFSET（$ A $ 1：$ H $ 1、MATCH（A9、$ A $ 2：$ A $ 5,0）、0）、SMALL（IF（OFFSET（$ F $ 1：$ H $ 1、 MATCH（A9、$ A $ 2：$ A $ 5,0）、0）<> ""、COLUMN（$ F $ 1：$ H $ 1））、COUNTIF（$ A $ 9：$ A9、$ A9）））
    これは配列数式です。正しく入力すると、式は中括弧で囲まれた式バーに表示されます。この数式をテーブルに入力します（各インスタンスも同様に中かっこで囲まれる必要があります）。
  5. 同様に、Priceの下の最初の行で、次の数式を数式バーに貼り付け、配列数式として入力します（ Ctrl+Shift+Enter）
     = INDEX（OFFSET（$ A $ 1：$ H $ 1、MATCH（$ A9、$ A $ 2：$ A $ 5,0）、0）、SMALL（IF（OFFSET（$ C $ 1：$ E $ 1 、MATCH（$ A9、$ A $ 2：$ A $ 5,0）、0）<> ""、COLUMN（$ C $ 1：$ E $ 1））、COUNTIF（$ A $ 9：$ A9、$ A9）））
    記入すると、テーブルが完成します。

Screenshot of table

2
Excellll