精华内容
下载资源
问答
  • 在办公中,使用Excel做数据录入时,为了方便,通常会在同一个Excel文件中的同一个工作表中进行录入。这样的录入方式能有效提高录入效率。但是,当需要按照某条件将资料进行分开打印时,就相当不方便了。比如,将资料...

    034cca88d20310f6397df61234f0da80.png

    在办公中,使用Excel做数据录入时,为了方便,通常会在同一个Excel文件中的同一个工作表中进行录入。

    这样的录入方式能有效提高录入效率。

    但是,当需要按照某条件将资料进行分开打印时,就相当不方便了。

    比如,将资料按地区进行打印,并分发给对应地区的业务员,这时候用总表来打印的话,我们需要把总表按地区分成多个工作表,再进行打印,逐个表格操作的话,就相当麻烦了。

    那么Excel中怎样可以快速的将一个工作表分为多个工作表呢?

    下面我们一起来操作吧。

    1.  确定需要分拆的工作表

    下方为讲解用的案例

    e29f756974643ff7e39e98282f1c8166.png

    2.  打开查看代码窗口

    鼠标右键点击工作表标签,在弹出的菜单中选择查看代码

    42b2b4dd9fbc9eedbebbc21364e6849e.png

    3.  输入代码(代码在图片下方,大家复制使用即可)

    在打开的查看代码窗口中粘贴下方的代码

    77d491bf3e06ea0859d8537859be9a84.png

    Sub 工作表拆分()

    Dim d As Object, sht As Worksheet, arr, brr, r, kr, i&, j&, k&, x&

    Dim Rng As Range, Rg As Range, tRow&, tCol&, aCol&, pd&

    Application.ScreenUpdating = False

    Application.DisplayAlerts = False

    Set d = CreateObject("scripting.dictionary")

    Set Rg = Application.InputBox("请输入拆分条件所在的列", Title:="提示", Type:=8)

    tCol = Rg.Column

    tRow = Val(Application.InputBox("请输入总表标题的行数"))

    If tRow = 0 Then MsgBox "未输入标题行行数,程序退出!": Exit Sub

    Set Rng = ActiveSheet.UsedRange

    arr = Rng

    tCol = tCol - Rng.Column + 1

    aCol = UBound(arr, 2)

    For i = tRow + 1 To UBound(arr)

    If Not d.exists(arr(i, tCol)) Then

    d(arr(i, tCol)) = i

    Else

    d(arr(i, tCol)) = d(arr(i, tCol)) & "," & i

    End If

    Next

    For Each sht In Worksheets

    If d.exists(sht.Name) Then sht.Delete

    Next

    kr = d.keys

    For i = 0 To UBound(kr)

    If kr(i) <> "" Then

    r = Split(d(kr(i)), ",")

    ReDim brr(1 To UBound(r) + 1, 1 To aCol)

    k = 0

    For x = 0 To UBound(r)

    k = k + 1

    For j = 1 To aCol

    brr(k, j) = arr(r(x), j)

    Next

    Next

    With Worksheets.Add(, Sheets(Sheets.Count))

    .Name = kr(i)

    .[a1].Resize(tRow, aCol) = arr

    .[a1].Offset(tRow, 0).Resize(k, aCol) = brr

    Rng.Copy

    .[a1].PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

    .[a1].Select

    End With

    End If

    Next

    Sheets(1).Activate

    Set d = Nothing

    Erase arr: Erase brr

    MsgBox "工作表拆分完成!"

    Application.ScreenUpdating = True

    Application.DisplayAlerts = True

    End Sub

    4.  关闭查看代码窗口

    只要点击查看代码窗口右上角的关闭按钮,代码就会录入成功,不需要做其他操作

    adb1b28bef3b377bf08d63f7b63bd03d.png

    5.  打开宏窗口

    在开发工具栏目中找到宏按钮,点击即可打开宏窗口

    ce98ab6906f4905f54992788a565ef31.png

    6.  执行工作表拆分

    在打开的宏窗口中,点击选择之前建好的宏命令,然后点击执行按钮

    79fb75a2400cfc4314faca444edb7ee2.png

    7.  选择工作表拆分条件列

    在弹出提示窗口后,点击一下工作表拆分条件所在的列的列标,就可以输入拆分条件所在的列,然后点击确定

    99641ec7bbf14c3d4d6f1ae82b0e8d1a.png

    8.  输入标题行数

    在输入窗口中,输入总表的标题的行数,我们案例中的标题是第一行,那么就输入1。完成这步操作,在工作表拆分后,其他工作表也会以这个第一行为标题行。

    5b4e2a1da7f14b1fef17c6c0368e86d8.png

    9.  最后确定

    在弹出的确定提示窗口中点击确定,即可完成工作表拆分

    b0b2365ac571c2bac88ad1e8d1035bf1.png

    10.  拆分完成

    经过以上的操作后,工作表标签中,除了原来的总表外,还出现了按地区命名的工作表,工作表中会按地区将对应内容建立表格。

    683879ad709fa4832253342e67ebba01.png

    至此总表已按地区为条件分拆完成。

    下期讲解:如何将同一个Excel文件中的所有工作表分别保存为单独Excel文件。

    各位如有疑问,可以给我留言哦

    展开全文
  • 最近推送的五篇文章:《偷懒的技术》答疑010:合并同一工作簿的多张工作表P142练习题075:如何批量给公式最外围套一层ROUND函数?如何按区间分段,按不同比例计算提成金额?编辑公式时无法链接到其他工作簿,用这个...

    最近推送的五篇文章:

    • 《偷懒的技术》答疑010:合并同一工作簿的多张工作表P142

    • 练习题075:如何批量给公式最外围套一层ROUND函数?

    • 如何按区间分段,按不同比例计算提成金额?

    • 编辑公式时无法链接到其他工作簿,用这个方法解决

    • 为什么每次打开表格,数字总是自动变成日期,这样解决

    资料下载

    本公众号不同于其他号,文章不会重复推送。

    请在本公众号主页点击“历史文章”菜单,查看应用专题及分类导航,

    在主页发送下表关键词可下载相应模板及资料。

    8699bc20f7493b5e7cc6ae017bad80dc.png

    ·  正  ·  文  ·  来  ·  啦  ·

    需求 在上一篇文章中我们介绍了用数据透视表将多个工作表汇总在一起。链接:《偷懒的技术》答疑010:合并同一工作簿的多张工作表P142上文只是用透视表将多个表格汇总在一起,如果需要将多个工作表的记录复制合并到一个工作表,那该怎么办呢?只需在上文的基础上,双击总计单元格即可。如下图:

    08987c14da6a888ca789847800e3023f.gif

    那如果要将上面的需求反过来:将一个清单式表格按类别拆分为多个工作表,并按相应类别命名工作表。该怎么办呢?具体操作 

    第一步、对表格进行透视

    先将类别复制一列并将字段标题改为“产品名称2”,作为筛选字段。然后用透视表进行透视。

    注意要将“产品名称2”拖到筛选字段处。

    9234e290ae4230755746b964d24862ec.gif

    第二步、设置透视表的格式

    将透视表“以表格形式显示、重复所有标签,不显示分类汇总”,以显示为清单式表格的样式

    7084ef3e322d7e31a8c3e388842bc345.gif

    第三步、分拆为工作表使用“显示报表筛选项”将透视表分拆为独立的工作表。然后选定分拆出的第一个工作表,按住SHIFT选定分拆出的最后一个工作表,即可选定分拆出的所有工作表。按Ctrl+A,选定工作表的所有单元格,复制粘贴,去掉透视表的形式。再删除第一行第二行。最后点击其他工作表,取消工作表组。

    182056e38a430f8e961bf48babb072cc.gif

    如果要按每N行分拆表格的话,只需使用INT函数建立一个辅助列,公式如下:

    =INT((ROW(A1)-1)/N)

    b72ead80da5ea0cf6349f5cc651b864b.png

    如果每隔N行拆分,辅助列公式为:

    =MOD(ROW(A1)-1,5)

    8f286e2952c8667674d3890776909733.png

    本文知识点
    • 透视表以表格形式显示

    • 透视表重复所有标签

    • 透视表不显示分类汇总

    • 显示报表筛选项

    留 言 互 动 2dcbda7539bc5407db9ebe6b3940a211.png 

    在工作中,关于透视表的应用,你还遇到过哪些难题?

    Excel畅销书推荐:

    《“偷懒”的技术:打造财务Excel达人》

    2017年当当网畅销榜Excel类第一名,办公类第二名,

    好评率99.8%

    学Excel必选书籍!

    6b722f2480278641b3b8ac6485cb23f5.png

    ?滑动下面的列表查看更多


    如何正确使用本公众号,学习Excel技巧,提高工作效率

    【目录】本公众号2017年推送文章的分类导航

    【目录】本公众号2018年推送文章的分类导航


    怎样才算精能Excel?看完再也不敢在简历上写精通Excel了!

    怎样才能让Excel运行得更快、从此告别卡慢等

    强大到逆天的“快速填充”,不用公式提取字符、调换位置


    你真的理解了相对引用?95%的人都错了,你呢?

    按年、季、月、旬、周分段求和,这一篇文章总结完了

    根据指定的条件,统计唯一值的个数,公式总结

    行列交叉查询公式汇总及解释

    如何按简称查找全称、如何反向模糊查找

    财务工作经典Excel公式及解析

    使用vlookup函数的常见错误及解决方法

    深入讲解SUMIF&多表多列多条件求和

    用sumif对超15位的代码条件求和居然出错了,原因是...


    一张图表示实际VS半年及年度预算完成情况
    要做出别具一格的图表都要用到这个强大的功能...

    普通的折线图蜕化成蝶后,美到你认不出来

    手把手教你制作华丽酷炫的走势图

    不用辅助列也可制作旋风图、蝴蝶图

    财务分析如何做到一图胜千言

    财务分析经典图表及制作方法(第1季)

    财务分析经典图表及制作方法(第2季)

    豪华仪表盘模板下载

    制作高大小的圆环图,这个方法更简单

    超越图表大神的小技巧:在柱形图背后添加平均线

    不等宽的堆积柱形图,这思路开脑洞...

    如何用箭头标注指标的同比增减情况?

    如果本文对你有帮助,走时别忘了点一下右下角的好看并转发分享给身边的朋友。

    展开全文
  • 有时会遇到这种情况,需要将同一单元格内手动换行的多行文本按行拆分到多个工作表行中,这时该怎样操作呢?  一、拆分单个单元格  1.双击包含多行的单元格,或选择单元格后按F2键进入单元格编辑模式,复制单元格...

    在同一单元格内可以用快捷键Alt+Enter进行手动换行,让单元格内的文本显示为多行。有时会遇到这种情况,需要将同一单元格内手动换行的多行文本按行拆分到多个工作表行中,这时该怎样操作呢?

        一、拆分单个单元格

        1.双击包含多行的单元格,或选择单元格后按F2键进入单元格编辑模式,复制单元格内文本。

        2.选择要粘贴到的某个单元格粘贴即可,粘贴注意时不能进入单元格编辑模式。

        

        二、批量拆分同列多个单元格

        如果某列中有许多单元格都要进行这样的拆分,用上述方法逐一拆分有些繁琐。这时可用下面的方法,以下图为例:

        1.打开“剪贴板”。

        Excel 2003中可单击菜单“编辑→Office 剪贴板”;Excel 2007/2010可在“开始”选项卡的“剪贴板”组中单击右下角的“对话框启动器”。

        

        然后复制需要拆分的区域,本例复制A1:A4区域。

        2.双击某个空单元格(如B5)进入单元格编辑模式,或选择某个空单元格后再单击编辑栏。在“剪贴板”中单击刚才复制的内容,将A1:A4区域内容粘贴到B5单元格内。这时可以看到B5单元格内所有手动换行的文本两侧都有一个英文双引号。

        

        3.选择B5单元格,按Ctrl+H,打开“查找和替换”对话框,将单元格内的英文双引号替换为空,去掉这些双引号。

        4.参考方法一,再次双击B5单元格进入单元格编辑模式,复制单元格内的全部文本内容,选择其他单元格粘贴即可。

    展开全文
  • 在使用Word的时候有一些技巧我们可以进行运用,比如说我们想要Word文档拆分成为上下两份文档,方便对文字内容进行编辑操作,应该怎样操作设置呢?下面我们一起来看看吧。 我们首先进入到需要进行编辑拆分的Word文...

    我们在平时生活或者工作中可以使用Word文档来编辑一些文本信息内容,来表达分享自己的心情、经历、经验。在使用Word的时候有一些技巧我们可以进行运用,比如说我们想要Word文档拆分成为上下两份文档,方便对文字内容进行编辑操作,应该怎样操作设置呢?下面我们一起来看看吧。
    我们首先进入到需要进行编辑拆分的Word文档中。
    如图:
    在这里插入图片描述

    接下里我们进行操作文档的拆分,我们在Word文档上方菜单选项中选择“视图”选项按钮。
    如图:
    在这里插入图片描述

    使用鼠标点击“视图”选项按钮后,进入到视图菜单选项界面,我们在视图选项中选择“拆分”。
    如图:
    在这里插入图片描述

    我们点击“拆分”选项按钮后我们的文档就进行了上下拆分。
    如图:
    在这里插入图片描述

    完成上述操作后,就完成了Word文档的拆分,如果想要把拆分过的Word文档恢复成原来的样子我们可以点击“取消拆分”,恢复原样。
    如图:
    在这里插入图片描述

    我们在整理编辑文字内容比较繁多的时候可以采用文档拆分的方式进行整理会比较方便一些,希望可以帮助到大家,感谢大家的观看。

    展开全文
  • ▼▼▼学员的问题,要将多个工作簿合并在同一个工作簿的多个工作表,再进行逆向操作,将多个工作表拆分成多个工作簿。如果仅仅是3个,Ctrl+C还是很快的,但问题是,有可能是30个,甚至更多,那就要按到手酸。刚好前...
  • Excel怎样设置标题行,工作表中标题行的处理 Excel做几十、几百行的表格很平常。看下部的数据时看不到表格的标题行,让人搞不清每一列的天文数字究竟代表什么意思。而且正常打印输出时,只有第一页能打印出标题行,...
  • #用python按某一列拆分Excel工作表,将内容写入一个工作簿 本次以“按照表中的某一列,将一张表格拆分为多张表”的需求为例,简单介绍这个过程中用到的pd.ExcelWriter,及每一句的作用。 如上表《学生.xlsx》,假设...
  • 当您不希望其他人一目了然地看到所有内容时,您可以尝试此方法,但又不能加密工作簿。例如,您需要加密工资数据。每个部门只能看到自己的工资,那就只能输入部门的密码才能查看。下图所示:让我们来看看是怎样来实现...
  • 你可以使用access 把你的excel 数据全部 导入 其中 然后就可以 用追加记录的方式 合并了,要比excel 操作方便许多……excel工作簿内多个子表格怎么全部合并成一张整的表格?以WPS 2019版例:如需把excel工内多个子...
  • 今天核心的内容就是怎样之间产生关系,在思考这个问题的时候,我们可以回顾之前学习python时,当一个任务涉及到很多的功能时,我们为了让程序的结构更清晰,扩展性更高,我们选择用函数>>模块>>...
  • 今天核心的内容就是怎样之间产生关系,在思考这个问题的时候,我们可以回顾之前学习python时,当一个任务涉及到很多的功能时,我们为了让程序的结构更清晰,扩展性更高,我们选择用函数>>模块>>...
  • 往期文章:【操作技巧】批量合并相同内容的单元格【函数应用】跨多个工作表汇总求和【函数学习】函数学习的四步法【Excel学习】如何去学习Excel ?Excel表格中怎样提取字符串中的特定字符。除了直接输入外,从已存在...
  • Excel中怎样固定单元格?

    千次阅读 2013-10-23 11:26:37
    先固定第一行,要用冻结窗口。... 然后保护第一行,选中第一行之后的所有行,点击菜单“格式->单元格”,在弹出单元格格式对话框中选择“保护”页,把“锁定”前面的勾去掉,最后再点击菜单“工具->保护->保护工作表
  • 四大一年+外企总账两年,已跳槽转另一家外企财务...最简单的,拿到一张原始数据,让你加工成业务或领导需要的形式,很多人不会想到的是对平,也就是拆分合并每一步过程要跟原去核对。做着做着出错,却没有一个ch...
  • VBA•操作单元格对象将数据拆分到多工作中我们经常要将同一类别的数据单独放到同一张表格中,对于这种重复性的工作用VBA可以节省很多的时间,现在我们就用部门数据来举例,接下来就让我们来学习这个神奇的技能吧...
  • 最近学习oracle 的心得

    2015-10-10 00:42:01
     随着项目进入运行期,工作没有那么忙了。但是工作却变得更有挑战性。比如怎样应付服务器无法响应的问题,大数据量下查询速度变慢的问题,在不影响用户使用的情况... 分区 ,可以将一个上百万级的大进行拆分,...
  • 设计模式(责任链)

    2020-07-17 15:02:32
    曾经有这么一些零散的功能节点,他们各自承担各自的义务,分工明确,各司其职。为了更高效,更完整地解决客户的...对,企事业单位中通常为了完成某项日常任务,通常要制定一些工作流程,按步骤拆分,并组织好各个环节
  • 6.2.3 执行“保护工作表”命令保护工作表 6.3 单元格的保护 6.3.1 设置用户编辑区域 文秘应用 保护工资额计算公式 6.3.2 保护部分单元格 6.3.3 隐藏单元格中的核心数据 第二篇 Excel在文秘与行政中的应用 Chapter 07...
  • 快速删除工作表中的空行快速删除空行一次删完Excel里面多出很多的空白行 每30行为一页并加上一个标题如何实现如何实现隔行都加上标题项 如何把标签页去掉的? 去掉默认的表格线(网线)表格的框线 列标的标识变了 符号...
  • EXCEL函数公式集

    热门讨论 2010-03-16 03:26:38
    快速删除工作表中的空行快速删除空行一次删完Excel里面多出很多的空白行 每30行为一页并加上一个标题如何实现如何实现隔行都加上标题项 如何把标签页去掉的? 去掉默认的表格线(网线)表格的框线 列标的标识变了 符号...
  • 深入浅出MySQL数据库开发、优化与管理维护

    千次下载 热门讨论 2014-01-21 15:48:01
     19.2 通过拆分提高的访问效率   19.3 逆规范化   19.4 使用中间提高统计查询速度   19.5 小结   第20章 锁问题   20.1 MySQL锁概述   20.2 MyISAM表锁   20.2.1 查询级锁争用情况  ...
  • 详细讨论了oracle数据库的创建、从oem到grid control、oracle的字符集、用户的创建与管理、空间和数据文件、自动存储管理(asm)、临时空间和临时文件、备份与恢复、备份方案与特例恢复、oracle的闪回特性、oracle...
  • word使用技巧大全

    热门讨论 2011-03-18 20:37:53
    85、多个工作表的页眉和页脚同时设置 95 86、判断成绩等级和统计各分数段人数 95 87、快速访问经常使用的文档 95 88、打造整齐的Word公式 95 89、快速精确调整表格宽度 95 90、改变文本框的形状 96 91、禁止Word中...
  • ASP EXCEL导入SQL

    2013-01-23 01:17:24
     文件服务器与应用服务器是分布式的,通过Map-Reduce进行任务的拆分与结果的合并,充分利用多台服务器的并行计算能力,提升整体平台的运行性能;  文件缓存采用多级缓存策略,解决命中率高的文件的频繁请求。而...
  • 14.6 合并和拆分表格 169 14.7 创建嵌套表格 169 14.8 学时小结 170 14.9 专家答疑 170 第15学时 增强表格 171 15.1 添加颜色到表格 171 15.1.1 选择表格背景 171 15.1.2 选择单元格背景 172 15.2 使用图像作为...
  • loadrunner测试资料

    2010-03-21 16:51:02
    对于服务器系统来说,网络性能显得尤其重要,有些服务器上为了节省成本,采用了桌面级的网络芯片,性能怎样,用这个软件一测便知了。以上介绍的这几款测试工具都是可以免费从网上下载的非商业软件,但是其测试结果和...
  • Microsoft C# Windows程序设计(上下册)

    热门讨论 2011-08-05 10:28:13
    7.4 打印机的情况怎样? 7.5 手工转换 7.6 页单位和页缩放 7.7 画笔的宽度 7.8 页面变换 7.9 保存图形状态 7.10 可度量大小 7.11 任意坐标 7.12 哪些事情不能做 7.13 世界坐标变换 7.14 总结 ...
  • C#编程经验技巧宝典

    热门讨论 2008-06-01 08:59:33
    C#编程经验技巧宝典源代码,目录如下: 第1章 开发环境 1 <br>1.1 Visual Studio开发环境安装与配置 2 <br>0001 安装Visual Studio 2005开发环境须知 2 <br>0002 配置合适的Visual Studio 2005...
  • Leland Wilkinson的著作在理论上改善了这种状况,他提出了一套图形语法,让我们在考虑如何构建一幅图形的时候不再陷在具体的图形元素里面,而是把图形拆分为一些互相独立并且可以自由组合的成分。这套语法提出来之后...

空空如也

空空如也

1 2
收藏数 32
精华内容 12
关键字:

怎样拆分工作表