可以使用VBA操作：123456 Sub sheet_transpose()On Error Resume NextFor i = 1 To Worksheets.Count - 1Sheets(1).Move after:=Sheets(Worksheets.Count - i + 1)NextEnd Sub
