Excel-如何從右到左轉換/逆轉列序列

Question

我有一個Excel工作表，其中包含約50列。 但是當前數據以與要求相反的順序顯示。

現在，我該如何反轉列的順序，以使右側最末端的列實際上變成左側的第一列，依此類推。 我基本上需要顛倒列的順序。

我已經找到了一種使用這種方法以所需格式顯示數據的方法-文件，選項，高級，刻度線：從右到左顯示圖紙應用

但這只是改變了DISPLAY，而不是其中的真實數據，因此，當我復制粘貼此表中的數據時，它再次僅按原始/錯誤順序顯示數據。

請提出如何做到這一點。

非常感謝。

Answer 1

這個小宏將Sheet1上的列以“翻轉”的順序復制到Sheet2 ：

Sub ColumnFlipper()
    Dim s1 As Worksheet, s2 As Worksheet
    Set s1 = Sheets("Sheet1")
    Set s2 = Sheets("Sheet2")
    Dim M As Long, N As Long, i As Long
    N = 1
    With s1
        M = .Cells(1, Columns.Count).End(xlToLeft).Column
        For i = M To 1 Step -1
            .Cells(1, i).EntireColumn.Copy s2.Cells(1, N)
            N = N + 1
        Next i
    End With
End Sub

修改工作表名稱以適合您的需求。

Answer 2

將其放在另一個工作表（例如Sheet2）的 A1中。

=INDIRECT("Sheet1!R" & ROW()&"C" & X-COLUMN()+1;FALSE)

！ Sheet1是原始工作表。
用總列數替換X。 向右填充X列，然后向下填充。