轻松搭建网盘系统,实现文件共享与安全存储的完美结合
720
2022-11-16
Excel中行列转换的教程
Excel中行列具体该如何进行转换呢?下面是由小编分享的excel中行列转换的教程,以供大家阅读和学习。
excel中行列转换的教程:
行列转换步骤1:首先一起来看一下最原始的数据格式。最终要生成的结果数据格式如图所示。由于涉及的数据记录很多,因此必须要使用自动化方法来解决问题。
行列转换步骤3:在VBA环境下,右击“Microsoft Excel 对象”,选择“插入”→“模块”,创建一个新的模块窗口。
行列转换步骤5:在打开的“模块1”中输入如图所示的代码:
'row 表示记录所在的行号
'col 表示记录所在的列号
'k 表示当前编辑单元格所在的列号
Public Function GetContent(row As Integer, col As Integer, k As Integer)
GetContent = Sheets(1).Cells(row + (k – 2) * 6, col).Value
End Function
行列转换步骤6:返回Excel界面,在整个文档的最前面插入指定的行数,在此小编插入5行,并制作如图所示的界面以备使用。
行列转换步骤7:接着在B1单元格中输入公式“=GetContent(ROW(B6),2,COLUMN())”,并按回车键。
行列转换步骤8:然后将该公式复制B2到B4行,在列方面根据记录的个数进行复制,也可以采用鼠标拖动的形式进行复制。最终结果如图所示。
版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。