EXCEL表格-数据拆分及分列

关注我,不迷路

点击进入EXCEL综合应用场景专栏

在使用EXCEL时往往会遇到需要拆分一个整体变成多列的情况,本文将介绍如何将一列完整的数据进行分列拆分。

例:请将如下表格拆分成姓名、性别、年龄、班级并填写到对应标题下

数据源姓名性别年龄班级
小赵 男 1岁 一班    
小钱 男 2岁 二班    
小孙 男 3岁 三班    
小李 男 4岁 四班    
小周 女 5岁 五班    
小吴 女 6岁 六班    
小郑 女 7岁 七班    
小王 女 8岁 八班    

分析:通过上述表格可以看到各组数据之间是以“空格”作为分界的(也有可能是其它分隔符,具体视情况而定方案大同小异)只要确认了所有数据共有的分隔符,即可进行分列操作。

解决方案:

1、选中需要拆分的数据源

2、点击数据-数据工具-分列

3、选择以“分割符号”进行分割后点击下一步

4、分隔符号勾选空格(具体视情况而定)

5、点击下一步,目标区域选择为要拆分后结果的起始单元格位置后点击完成

动图演示:

以上方法就是分列的操作方法,使用前提是必须有相同的分隔符或相同的间隔宽度 


针对以上问题,使用之前文章所讲过的“智能填充”也可以实现,相比之下我个人还是更喜欢用智能填充。

动图演示:

具体操作方法详见下方我的另一篇文章↓:

魔法操作之智能填充(点击此处跳转)


关注我,不迷路

******我的本文相关专栏******

EXCEL综合场景应用详解(点击此处进入)


******我的其它作品专栏******

软件测试-压力测试专栏(点击进入) 

PC电脑常见故障处理思路总结(点击此处进入)

全国计算机等级考试-二级python基础(点击此处进入)

使用宏语言可以通过编写代码来将一个Excel表格分成多个工作表,具体步骤如下: 1. 首先,打开Excel并选择要分割的表格所在的工作簿。 2. 切换到"开发工具"选项卡,并点击"Visual Basic"按钮以打开"宏编辑器"。 3. 在"宏编辑器"中,选择"插入"菜单,然后选择"模块"以创建一个新模块。 4. 在新模块中,编写宏代码来分割表格。以下是一个示例代码: ```vba Sub SplitSheet() Dim ws As Worksheet Dim newWS As Worksheet Dim lastRow As Long Dim i As Long, j As Long ' 获取原始表格所在的工作表 Set ws = ThisWorkbook.Worksheets("Sheet1") ' 获取原始表格最后一行的行数 lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row ' 遍历原始表格的每一行数据 For i = 1 To lastRow ' 获取每行的工作表名 sheetName = ws.Cells(i, 1).Value ' 创建新工作表,并将当前行的数据复制到新工作表中 Set newWS = ThisWorkbook.Worksheets.Add(After:=ws) newWS.Name = sheetName ws.Rows(i).EntireRow.Copy newWS.Rows(1) ' 删除原始工作表中已复制的行 ws.Rows(i).EntireRow.Delete i = i - 1 lastRow = lastRow - 1 Next i End Sub ``` 5. 修改代码中的"Sheet1"为你要分割的表格所在的工作表名称。 6. 在代码中可以根据实际需求进行修改,比如可以调整要复制的数、修改复制的目标位置等。 7. 运行宏,方法是按下"Alt" + "F8"打开"宏对话框",选择"SplitSheet"并点击"运行"按钮。 8. 运行完成后,原始表格会被分割成多个工作表,每个工作表的数据根据你的代码逻辑进行分割和复制。
评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

@Liu_GuoXing

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值