Vba 以编程方式将Excel电子表格翻转到相反的轴
我有一个Excel电子表格,其中数据以列的形式显示。例如: 我想翻转此电子表格,使标题单元格位于A列,数据位于B、C和D列。例如: 是否可以通过Excel功能/编程实现这一点?我不想手动翻转数据Vba 以编程方式将Excel电子表格翻转到相反的轴,vba,excel,Vba,Excel,我有一个Excel电子表格,其中数据以列的形式显示。例如: 我想翻转此电子表格,使标题单元格位于A列,数据位于B、C和D列。例如: 是否可以通过Excel功能/编程实现这一点?我不想手动翻转数据 我正在使用Excel for Mac 2007,但如果能使用任何版本的解决方案,我将不胜感激。此宏将使用转换后的数据创建一个新的工作表: Sub TransposeData() ' ' TransposeData Macro ' ' Range(Selection, Selection.E
我正在使用Excel for Mac 2007,但如果能使用任何版本的解决方案,我将不胜感激。此宏将使用转换后的数据创建一个新的工作表:
Sub TransposeData()
'
' TransposeData Macro
'
'
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
End Sub
您需要位于数据的左上角,然后运行宏。我发现实现这一点的最简单方法是使用
转置
功能,如下所示
以下是使用Office for Mac 2007进行转置的步骤:
复制/剪切数据-->编辑
-->粘贴特殊…
-->转置
复制
粘贴特殊,转置
@chrisneilsen:转置工作得很好。如果你把这个作为一个答案,我将投票并接受。继续接受你自己的答案。很高兴它起到了作用。我没听清你的问题,我想这就是你所谓的“手动翻转数据”。@RicardoOliveros Ramos:很抱歉你的措辞令人困惑。所谓“手动翻转数据”,我的意思是我不想将每个单元格单独复制到新的电子表格中。但是谢谢你的回答!