excel把行改为列(excel如何将行改为列)

Dimx1,x2,x3,x4

OnErrorResumeNext

Setmysheet1=ThisWorkbook.Worksheets("Sheet1")'定义工作表Sheet1。

Setmysheet2=ThisWorkbook.Worksheets("Sheet2")。

x4=1'初始值是1

mysheet2.Columns("A:B")=""'清空Sheet2上面的A、B两列。

Forx2=2To10000'从第2行到10000行。

Ifmysheet1.Cells(x2,1)<>""Andmysheet1.Cells(x2,2)<>""Then。

'如果工作表1的第1、2列对应的行不为空白，则。

Forx3=3To33'从第3列到33列。

Ifmysheet1.Cells(x2,x3)<>""Then'如果单元格里面不为空白，则。

x4=x4+1'从第二行开始

mysheet2.Cells(x4,1)=mysheet1.Cells(x2,1)&"年"&_。

mysheet1.Cells(x2,2)&"月"&mysheet1.Cells(1,x3)&"日"。

'拼起来的日期

mysheet2.Cells(x4,2)=mysheet1.Cells(x2,x3)'把内容写入相应的行。

EndIf

Next

EndIf

Next

EndSub

（二）sheet1里面的数据样式如下图：

【注】如果当月没有31号，但对应的单元格有数据，此时拼接出来的日期及结果将会有错。

excel如何将行改为列

怎么把excel中行变成列呢

常用方法有转置法、公式法。

1、转置法：

选中要转换的资料，复制，再选中要贴上资料的第一个单元格，右键单击，弹出列表中选择“选择性贴上”，对话方块中选择“转置”，确定。

2、公式法：

假设要转换的资料在第一行，自A1单元格开始，公式如下：

=OFFSET($A$1,,ROW(A1)-1)。

下拉公式。

怎样把excel中行变成列

1、复制这一行内容

2、在你想贴上的另一行（不能是同一行）某个单元格-点选右键-选择性贴上-[转置]-确定

在EXCEL中，如何把行变成列，把列变成行。

复制你要改变的资料，选中你放资料的首个单元格，右击选择选择性贴上，勾选弹出的视窗有一个转置，就可以了。

如何把EXCEL行变成列

复制那一行有资料区域

点目标起始单元格,右击,"选择性贴上"

点弹出对话方块右下的转置

Excel表如何将行变成列，把列变成行？

先复制当前表格，编辑--选择性贴上。转置你把它选上，就可以转换了。

Excel2007如何把行变成列，把列变成行。

在Excel进行资料处理时，有时需要把表格标题行变成列，把标题列变成行，。

Excel2007的转置功能，可轻松把行变成列。

，把列变成行。

首先选中要转置的资料区域，然后单击滑鼠右键，在弹出的快捷选单中选复制（或按Ctrl+C组合键）。

选中转置资料的目的单元格，单击滑鼠右键，在弹出的快捷选单中选择性贴上，开启选择性贴上对话方块，勾选转置复选框，如上图所示，再单击确定按钮转置成功，即看到资料的行变成列，列变成行。

oracle中怎么把行转变成列，列转变成行。

用C#实现矩阵的转置。

假设原矩阵式a是int[m,n]，新定义一个二位阵列b是int[n,m]。

然后对每个b的元素b[x,y]赋值a[y,x]。

Excel列号怎么变成列名

在A1中输入或复制贴上下列公式

=SUBSTITUTE(ADDRESS(ROW(),COLUMN(),4),1,)。

或

=LEFT(ADDRESS(ROW(),COLUMN(),4),LEN(ADDRESS(ROW(),COLUMN(),4))-1)。

右拉填充

excel如何将行变成列

改页面设定，横向，纵向

复制，选择性贴上，选中“转置”，确定。