230问答网 > 如何把excel里sheet里的数据全都转置到sheet2里，不要选择性粘贴，要自动引用的。

如何把excel里sheet里的数据全都转置到sheet2里，不要选择性粘贴，要自动引用的。

2024-12-26 11:31:55

推荐回答（5个）

回答1：

假定原始表为sheet1

sheet2的a1输入

=OFFSET(Sheet1!$A$1,COLUMN(A1)-1,ROW(A1)-1)&""

公式右拉下拉

不知道是不是你要的效果，看下图

回答2：

如果是一一对应的话，值接=就好了，如sheet2单元A1中，输入“=sheet1!A1“就好

回答3：

Sub test1()
Dim arr()
arr = Sheet1.UsedRange
Sheet2.Range("a1").Resize(UBound(arr, 2), UBound(arr, 1)) = Application.WorksheetFunction.Transpose(arr)
End Sub‘复制进去运行一次就可以了。

回答4：

=TEXT(Sheet1!A1,0) 然后一拉吧

回答5：

转置，行变列，列变行那种吗？
并且到sheet2中？