MSEXCEL將數據轉換爲數據庫格式

Question

我正在將Tabular數據上傳到我的SQL數據庫中。

以下是數據的原始外觀。

我想在一列中的每個溫度（Y軸），然後在下一列中的每個重力（X軸），其次是相交值。

這樣的：

Answer 1

我接到來自ExcelForum一個人幫助。這是宏代碼，解決了我的問題。

 Option Explicit 

    Sub transpose_data() 
    Dim lrow As Long, lcol As Long, a As Long, i As Long, j As Long 

    Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = "Output" 
    a = 1 
    With Worksheets("Original") 
     lrow = .Range("A" & .Rows.Count).End(xlUp).Row 
     lcol = .Range("IV1").End(xlToLeft).Column 
     For i = 2 To lrow 
      For j = 2 To lcol 
       Worksheets("Output").Cells(a, 1).Value = .Cells(i, 1).Value 
       Worksheets("Output").Cells(a, 2).Value = .Cells(1, j).Value 
       Worksheets("Output").Cells(a, 3).Value = .Cells(i, j).Value 
       a = a + 1 
      Next j 
     Next i 
    End With 

Worksheets("Output").Columns("A:C").NumberFormat = "0.00" 

End Sub 

請務必將工作表名稱更改爲「原始」，以使此代碼正常工作。