如何将一张EXCEL表格里的数据拆分成几张SHEET或者工作表_百度知道
如何将一张EXCEL表格里的数据拆分成几张SHEET或者工作表
我有更好的答案
原始数据表如下（名称为：数据源），需要根据B列人员姓名拆分成每个人一个工作表。点击【开发工具】-【Visual Basic】或者Alt+F11的快捷键进入VBE编辑界面。如下图所示插入一个新的模块。如下图，粘贴下列代码在模块中：Sub CFGZB()Dim myRange As VariantDim myArrayDim titleRange As RangeDim title As StringDim columnNum As IntegermyRange = Application.InputBox(prompt:=&请选择标题行：&, Type:=8)myArray = WorksheetFunction.Transpose(myRange)Set titleRange = Application.InputBox(prompt:=&请选择拆分的表头，必须是第一行，且为一个单元格，如：“姓名”&, Type:=8)title = titleRange.ValuecolumnNum = titleRange.ColumnApplication.ScreenUpdating = FalseApplication.DisplayAlerts = FalseDim i&, Myr&, Arr, num&Dim d, kFor i = Sheets.Count To 1 Step -1If Sheets(i).Name && &数据源& ThenSheets(i).DeleteEnd IfNext iSet d = CreateObject(&Scripting.Dictionary&)Myr = Worksheets(&数据源&).UsedRange.Rows.CountArr = Worksheets(&数据源&).Range(Cells(2, columnNum), Cells(Myr, columnNum))For i = 1 To UBound(Arr)d(Arr(i, 1)) = &&Nextk = d.keysFor i = 0 To UBound(k)Set conn = CreateObject(&adodb.connection&)conn.Open &provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=& & ThisWorkbook.FullNameSql = &select * from [数据源$] where & & title & & = '& & k(i) & &'&Worksheets.Add after:=Sheets(Sheets.Count)With ActiveSheet.Name = k(i)For num = 1 To UBound(myArray).Cells(1, num) = myArray(num, 1)Next num.Range(&A2&).CopyFromRecordset conn.Execute(Sql)End WithSheets(1).SelectSheets(1).Cells.SelectSelection.CopyWorksheets(Sheets.Count).ActivateActiveSheet.Cells.SelectSelection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _SkipBlanks:=False, Transpose:=FalseApplication.CutCopyMode = FalseNext iconn.CloseSet conn = NothingApplication.DisplayAlerts = TrueApplication.ScreenUpdating = TrueEnd Sub如下图所示，插入一个控件按钮，并指定宏到刚才插入的模块代码。点击插入的按钮控件，根据提示选择标题行和要拆分的列字段，本例选择“姓名”字段拆分，当然也可以选择C列的“名称”进行拆分，看实际需求。代码运行完毕后在工作簿后面会出现很多工作表，每个工作表都是单独一个人的数据。具体如下图所示：注意：1）原始数据表要从第一行开始有数据，并且不能有合并单元格；2）打开工作簿时需要开启宏，否则将无法运行代码。
股票分析师
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。查看: 9269|回复: 5
如何在饼图下面添加数据表
阅读权限20
在线时间 小时
如何在饼图下面添加数据表,详见附件。
谢谢........
02:05 上传
点击文件名下载附件
9.47 KB, 下载次数: 123
阅读权限100
在线时间 小时
(28.2 KB, 下载次数: 7)
10:29 上传
阅读权限20
在线时间 小时
请求上面的楼主说明制作过程，谢谢
请求上面的楼主说明制作过程，谢谢
阅读权限100
在线时间 小时
将柱形图的表 复制图片过去
阅读权限20
在线时间 小时
可以直接勾选“显示图例”
阅读权限20
在线时间 小时
我的方法是对原始数据表照相（照相机），放在饼图旁。这个方法试试有没有那个效果。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师求excel高手指导：如何删掉没有数据的那行，如下图_百度知道
求excel高手指导：如何删掉没有数据的那行，如下图
只保留B列中有数据对应的A列值，其他包括空行全部删掉？注：我的数据量很大，这里只是粘贴了小部分图，如何快速删完？
我有更好的答案
选B列——菜单栏——数据——筛选——自动筛选——点B1下拉选（空白）——选筛选出来的行号——按Delete键删除。
采纳率：72%
来自团队：
选择B列，按F5定位，点空值，确定。删除，整行，确定。
选定B列后按Ctrl+G，依次点击【定位条件——空值——确定】，在右键菜单中点击【删除——整行】。
为您推荐：
其他类似问题
热量表的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。如何将合并的EXCEL表格分开打
　一、打开两个excel进行数据对比的操作方法如下：
打开需要的表格，选中“视图-并排比较”如下图，可以看到工作簿1 和工作簿2 是并排显示的，主要用于对比
或选择“视图-重排窗口”
如果两个工作表中的内容存在相关性(比如左边的表是 ID右边的表是 ID 对应的文字)，可以使用“同步滚动”功能，进一步方便查看。点击“并排查看”和“同步滚动”两个按钮，则一个工作表的上下滚动，会与另一个同步。
二、如果需要在同一窗口打开两个相同的表格，操作如下：
1、打开需要的表格，在“视图”下找开“新建窗口”
如下图，是2个相同的工作薄：
三、对于两张表之间的数据如何快速有效的对比，找出不同之处：
就下图所示，两个数据，大部分是相同数据，只有3处，我稍微修改了一下。
1、突出显示不同数据所在区域
进入【数据】-【排序和筛选】-【高级】，将【列表区域】和【条件区域】分布框选两张表格数据区域。确定后，最终Excel会将不同数据区域隐藏起来。我们只需选中表格，然后添加上颜色，再将其显示出来表格，即可看到没有加颜色区域就是不同数据区域。
2、获取不重复数据区域
第二种方法就是第一种延伸出来的，所以方法类似。不同就是要选中【将筛选结果复制到其他位置】，然后，选择复制到区域，最后勾选【选择不重复的记录】。
3、突出显示不同数据
第1、2种方法也都只是区域，下面两种就更加精准了，精准到每个单元格。【条件格式】-【新建规则】-【只包含以下内容的单元格设置格式】，下面选项设为【不等于】，区域是【=Sheet2!A1】（注意，默认是绝对引用，改成相对）。
4、函数找出并对比不同数据
首先，我们新建一个空白工作簿，然后在A1单元格复制下列公式：
【=IF(Sheet1!A1&&Sheet2!A1, "Sheet1:"&Sheet1!A1&" vs Sheet2:"&Sheet2!A1,"")】
我们可以看到对应空白单元格不同数据中，会显示【Sheet1:332 vs Sheet2:32432】；【 Sheet1:224 vs Sheet2:321】；【Sheet1:442 vs Sheet2:19880】，既找出了不同数据所在位置，又详细的列出了Sheet1 与Sheet2中精确数据，是不是非常棒！
四、打开两个窗口的操作方法：
通常情况下打开的excel表格都是在文档上进行排列的，可以看到一个个表单相连着，如下图显示。
如果想打开两个单独的窗口，是这种样式,两个独立的表单,也是两个独立的窗口。
操作如下 ：
1、新建一个空白工作薄，在电脑底部的任务栏上找到图标，然后打开它
2、打开一个工作表或重新制作一个工作表
两个窗口单独存在了
当然，打开任务栏，可以看到有一项是“任务栏按钮”默认的是“自动合并”，可以选择“从不合并”如下图显示。再打开两个excel表单的时候，就会是两个独立的窗口。
将多个工作薄窗口合并显示的方法：1、确保所有预显示的窗口都处于打开状态；2、点击主页面【窗口】功能项；3、点选【重排窗口】选项；4、在跳出功能框中点选预显示状态。5、点击【确定】完成。
之前我们讲到了如何将一列数据转置为多行多列，想必大家对这种方法已经了如指掌了，那么碰到对多行多列的数据转置为一列的情况，我们怎么办呢?我相信你们已经有答案了。Excel表格怎么把一列数据转换为多行多列数据?1、同样我们会看到如下的数据，这样的数据假如一多的话，就会给我们的数据处理带来很多麻烦。2、首先在倒数...
分离姓名和手机号码 常用的公式是：B2公式：=LEFTB(A2,SEARCHB(?A2)-1)C2公式 MIDB(A2,SEARCHB(?A2),11)其实，有比这个更快的方法，不需要任何公式和函数。只需要把A列调整至4个汉字的宽度，然后执行： 开始-填充-两端对齐 执行后的姓名和手机号码已经完全分离出来，如下图所示 接下就只需要稍作整理，在B2输入1再选取...
由于Excel本身就是有许多小的表格组成的，因此我们无法拆分单元格，您可以插入行或列，同时也可以合并单元格，所谓的拆分单元格，就是将已经合并的单元格执行撤消操作。1、首先，我们可以将几个单元格进行合并，用鼠标选中要合并的表格，点击【合并并剧中】如下图：2、然后在合并后的单元格上右键—【设置单元格式】 3、...
方法一：Excel适用 选取D列，点击菜单“数据”-》“分列”，如图：选取“分隔符号”-》“下一步”，如图： 点击“空格”，然后“下一步”，点击“完成”即可。方法二：公式法 设时间1为E列，时间2为F列，时间3为G列，时间4为H列。E2输入公式：=LEFT(D2,5)F2输入公式：=RIGHT(LEFT(D2,11),5)G2输入公式：=LEFT...
2、再次选中D1单元格，用“填充柄”将上述公式复制到D列下面的单元格中，B、C、D列的内容即被合并到E列对应的单元格中。3、选中E列，执行“复制”操作，然后选中F列，执行“编辑→选择性粘贴”命令，打开“选择性粘贴”对话框，选中其中的“数值”选项，按下“确定”按钮，E列的内容(不是公式)即被复制到F列中。4、将B、C、...
假设要在合并单元格内输入多行文字；1、选中这个单元格，点击右键&设置单元格格式；见图一 2、在“设置单元格格式”对话框中，转到“对齐”标签，水平对齐：左对齐；垂直对齐：靠上；文本控制下面勾上“自动换行”前面的小方块；见图二 3、实际结果：见图三 如果需要在文字中间强制换行：1、双击这个单元格，光标移动到要换...
有这么一种情况，就是我们有很多张excel，而且excel表里面的公式基本一样，我们就想快速的把这些excel合并在一起，意思在合并在一个excel页面，这样可以方便我们分析和统计，那么excel如何快速把多个工作表合并到一个excel表？下面为大家介绍这种方法，希望能帮助到大家。工具/原料 Excel 操作步骤：1、原始数据所在工作簿...
使用Excel表格快速分离姓名和手机号码的方法 分离姓名和手机号码 常用的公式是：B2公式： LEFTB(A2,SEARCHB(?A2)-1)C2公式=MIDB(A2,SEARCHB(?A2),11) 其实，有比这个更快的方法，不需要任何公式和函数。只需要把A列调整至4个汉字的宽度，然后执行：开始-填充-两端对齐 执行后的姓名和手机号码已经完全分离出来，如下图...
1、打开任意一个Excel 表格!点击左上角按钮!再点击“Excel 选项”菜单。2、在打开“Excel 选项”菜单中选择高级选项。3、然后找到“显示”菜单下的“在任务栏中显示所有窗口”，把前面的框框打上钩。4、按“确定”退出。5、好了，到此就成功达到目标。EXCEL表格中怎么将前面的一列拆分成后面的三列，如图_百度知道
EXCEL表格中怎么将前面的一列拆分成后面的三列，如图
我需要将前面材料规格填上后，后面的材料尺寸长宽高自动生成。
我有更好的答案
选择A列 数据
分列 分隔符号 下一步选择 其他 输入 *
下一步目标区域 选择 =$B$1 完成或在B2中输入或复制粘贴下列公式=TRIM(MID(SUBSTITUTE($A2,&*&,REPT(& &,99)),COLUMN(A2)*99-98,99))右拉填充，下拉填充
采纳率：58%
来自团队：
假设，源数据从A2起。在B2输入=--LEFT(A2,FIND(&*&,A2)-1)在C2输入=--TRIM(MID(SUBSTITUTE(A2,&*&,REPT(& &,99)),99,99))在D2输入=--RIGHT(A2,(LEN(A2)-FIND(&*&,A2,FIND(&*&,A2)+1)))均回车并向下填充。
假设在A2,&B2 公式： 右拉，下拉公式=--TRIM(MID(SUBSTITUTE($A2,&*&,REPT(& &,99)),COLUMN(A2)*99-98,99))如图：
选中该列，数据-分列，以*为分列符进行分列，确定即可
请查看一下我的问题补充
其他1条回答
为您推荐：
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。