Excel Transpose - Jagged Array

Question

我需要在Excel中轉​​置或將鋸齒陣列轉換爲多列，並且遇到一些困難。我的數據如下：

Round A1 A2 A3 A4 A5 
1  1 2 3 
2  4  5 
3  6   7 
4  8  9 

所以我需要拉平這個地方我去的每一行，每一組的序列號只有一個列轉換爲一個單獨的一個被標記每行

SeqNum A1 A2 A3 A4 A5 
1  1 
2  2 
3   3 
4  4 
5    5 
6 6 
7    7 
8  8 
9   9 

我編輯了示例中的數字以使其更清晰。基本上我想將每行有多個條目的第一個表放到第二個只有每行1個條目的表中。

我有以下的算法，我想在Excel中

實施

int numOfTotalElements = 0; 
List<int> flattened = new List<int>(); 
int numRows = matrix.length; 
for(int i=0; i<matrix.length; i++){ 
    for(int j=0; j<matrix[i].length; j++){ 
    flattened.add(matrix[i][j]) 
    }//end cols 
}// end rows 

foreach(int i in flattened){ 
    System.Console.WriteLine(i); 
} 

Answer 1

看看這些人得到你，你試圖去。

Option 1:excel-vba

Sub expandFlatten() 
    Dim c As Long, i As Long, j As Long 
    Dim vals As Variant, nuvals As Variant 

    With Worksheets("sheet2") 
     With .Cells(1, 1).CurrentRegion 
      vals = .Cells.Value2 
     End With 
     c = UBound(vals, 2) + 2 
     .Cells(1, c).CurrentRegion.Clear 
     .Cells(1, c).Resize(UBound(vals, 1), UBound(vals, 2)) = vals 
     With .Cells(1, c).CurrentRegion 
      .Cells(1, 1) = "SeqNum" 
      .Offset(1, 1).ClearContents 
      .Cells(2, 1).Resize(Application.Max(.Parent.Cells(1, 1).CurrentRegion), 1) _ 
       .DataSeries Rowcol:=xlColumns, Type:=xlLinear, Step:=1 
     End With 
     With .Cells(1, c).CurrentRegion 
      ReDim nuvals(1 To .Rows.Count - 1, 1 To .Columns.Count - 1) 
      For i = LBound(vals, 1) + 1 To UBound(vals, 1) 
       For j = LBound(vals, 2) + 1 To UBound(vals, 2) 
        If Not IsEmpty(vals(i, j)) And IsNumeric(vals(i, j)) Then 
         nuvals(vals(i, j), j - 1) = vals(i, j) 
        End If 
       Next j 
      Next i 
      .Offset(1, 1).Resize(UBound(nuvals, 1), UBound(nuvals, 2)) = nuvals 

     End With 
     .Activate 
     .Cells(1, 1).Select 
    End With 
End Sub 

Option 2:excel-formula

重新創建列標題標籤和一個數字序列向下右側（高達MAX(B:F)）後，將在P2這個標準公式，

=IFERROR(INDEX(B:B, MATCH($O2,B:B, 0)), "") 

向右和向下填充。

---

^{原始數據expandFlatten（）INDEX（...，MATCH（...}

---