精华内容
下载资源
问答
  • word表格排版工具是一款可以批量自动排版工具软件,适合有大量排版...其他功能如快速把word文件内的所有数字转变成带千分位的数字、对word文件内嵌的excel文件自动处理成word表格等都非常实用。 word表格排版工具截图:
  • 编按:我们在工作中难免会遇到一些未设置任何格式表格数据,这类数据会让读者看起来非常吃力。当碰到这个问题时,如果你只会手动一个个地去设置,那可得忙活半天。而如果你掌握一些整理数据的小技巧,别人半天的...

    ad3e48494df0d0965121ee256e7abb6d.png

    编按:我们在工作中难免会遇到一些未设置任何格式的表格数据,这类数据会让读者看起来非常吃力。当碰到这个问题时,如果你只会手动一个个地去设置,那可得忙活半天。而如果你掌握一些整理数据的小技巧,别人半天的工作量,你只需要10秒,不信,你往下看。学习更多技巧,请收藏关注部落窝教育word图文教程。


    小伙伴们在使用Word的过程中,难免会跟表格打交道。

    比如,在用Word制作一些报告或数据分析的时候,经常会插入表格并录入相应的数据,如下图,是公司最近三年的营收情况:

    cafa96ec5946584863a874b66d9b7610.png

    从上图中的营收数据来看,咱们很难一眼就看出每年的营收是多少?

    但是,如果咱们给每个数字加上逗号(即千位分隔符)进行区分下。

    988c70f4a8f7a9a90b7ab2f07db033b4.png

    那么,可以更直观、更准确、更快地看出数据是多少,一目了然!

    如何实现上图的效果呢?是一个个地为数据添加分隔符号吗?

    NO!NO!NO!

    显然不是,这样做并不是我们正确学习Word的姿势!下面小编就跟大家分享两个批量处理的小技巧。

    01、利用Excel快速设置

    Step01:选择中这些数字,按【Ctrl+C】复制粘贴到Excel中,然后设置成【千位分隔样式】格式。

    Step02:点击右键,选择【只保留文本】,将Excel中的数据复制粘贴回Word表格中。

    Step03:最后,再设置下数据格式就可以了。

    710776cc5e21838b83e69ee8ff6cc2cc.png

    02、利用“查找和替换”批量设置

    Word中,若有大量相同格式的内容需要处理,都可以用查找和替换来完成。这也是为什么Word“查找和替换”功能比Excel“查找和替换”强大的原因所在。学习更多技巧,请收藏关注部落窝教育word图文教程。

    其原理就是Word中的“查找和替换”可以使用正则表达式,而Excel中的“查找和替换”却不行!

    Step01:调出【查找和替换】对话框。在【查找内容】中输入:“([0-9])([0-9]{3})([0-9]{3}[!0-9])”;在【替换为】中输入:“ 1,2,3 ”,并勾选“使用通配符”复选框。

    点击“全部替换”按钮,结果如下:

    4a1dfb7ba4db7c57d4bd187cb92dc9af.png

    可以看到百万位及以上的数据都已经替换完成了!

    代码解析:([0-9])([0-9]{3})([0-9]{3}[!0-9])

    [0-9]:表示0到9中任意一个数字。

    [0-9]{3}:表示0-9中任意三位数字。

    [!0-9]:表示除了0至9之外的任意一个字符。(这里的感叹号表示除了什么之外的意思。)

    1,2,3:表示前面第一个圆括号、第二个圆括号和第三个圆括号分别对应的数字,并且在数字之间加上逗号。

    PS:这一步只适用于10亿位以下至百万位及以上的数字使用。如果数字再大的话,可以对代码做适当调整。

    Step02:继续在【查找和替换】对话框中的【查找内容】中输入:“([0-9])([0-9]{3}[!0-9年])”;【替换为】中输入:“1,2”,查找和替换百万位以下的数据。

    29c741a06cf30c70fd25b85e46c11548.png

    PS:这一步适用于百位以上至百万位以下的数字,代码含义与上方相同。

    上面小编使用的方法是由大数到小数来查找替换,必须按步骤进行噢!小伙伴们也可以尝试着从小数到大数进行查找和替换,当然代码会略有不同,动手试一试吧!

    03、总结

    第1种方法适合于数据量较少或者数据比较集中的情况,如果数据分散在文档不同的位置,则不适合批量复制粘贴到Excel中来处理。这个时候,咱们可以使用第2种方法【查找和替换】功能来实现。

    好了,今天的分享就到这里,希望本篇文章对你有所帮助!学习更多技巧,请收藏关注

    部落窝教育www.itblw.com


    ****部落窝教育-word添加千位分隔符****

    原创:曹光庆/部落窝教育(未经同意,请勿转载)

    更多教程:

    部落窝教育www.itblw.com

    微信公众号:worditblw

    相关推荐:

    Enter键,用得好是神器,用不好让你哭!

    Word中一个快捷键,10种用法!

    万能键之王——Alt,你活用了吗?

    3 个 Word 隐藏技巧,只有老司机才知道!​

    展开全文
  • 曾经贴报告附注的时候需要把各种数据粘贴到word中,其中最让我头疼的事情莫过于word中的格式调整、数字的千分符调整(挤着眼睛去打逗号)、还有把数字换算为万元,手工调整的时候就感觉自己是个呆瓜(当然此瓜非彼瓜...

    曾经贴报告附注的时候需要把各种数据粘贴到word中,其中最让我头疼的事情莫过于word中的格式调整、数字的千分符调整(挤着眼睛去打逗号)、还有把数字换算为万元,手工调整的时候就感觉自己是个呆瓜(当然此瓜非彼瓜),于是自己写了两个小工具,这次一起送给大家。放心,不用安装什么工具箱没有套路收费。

    1.三个按钮:千分符、数字除万、数字除万添“万”

    首先先看3个按钮的效果:

    ba8484e8a1b809113faaeddc3bba71d5.png

    设置方法非常简单,跟着步骤走,2分钟搞定:

    第一步、首先在任何word文档中按ALT+F11,呼出VBE编辑器

    b6d06475321119739f2e69ead07ab357.png

    第二步、找到左侧normal模板,若没有模块,则右键插入模块

    0a0d4e41eab81bb07bb975b0f5c12255.png


    第三步、双击模块1,把下面的代码复制粘贴进来

    b920c1d61f298262753317e6347edcac.png

    代码如下:

    Sub 除万添万()
    Dim i As Single
    Application.ScreenUpdating = False
    If Selection.Type = 2 Then
            If IsNumeric(Selection.Text) Then
            i = Selection.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            Selection.Text = q & "万"
            End If
    ElseIf Selection.Type = 5 Then
       For Each Acell In Selection.Cells
       Set CR = ActiveDocument.Range(Acell.Range.Start, Acell.Range.End - 1)
       'MsgBox CR
            If IsNumeric(CR.Text) Then
            i = CR.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            CR.Text = q & "万"
            End If
        Next
    ElseIf Selection.Type = 4 Then
         For Each Acell In Selection.Cells
       Set CR = ActiveDocument.Range(Acell.Range.Start, Acell.Range.End - 1)
       'MsgBox CR
            If IsNumeric(CR.Text) Then
            i = CR.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            CR.Text = q & "万"
            End If
        Next
    End If
    Application.ScreenUpdating = True
    End Sub
    Sub 除万()
    Dim i As Single
    Application.ScreenUpdating = False
    If Selection.Type = 2 Then
            If IsNumeric(Selection.Text) Then
            i = Selection.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            Selection.Text = q
            End If
    ElseIf Selection.Type = 5 Then
       For Each Acell In Selection.Cells
       Set CR = ActiveDocument.Range(Acell.Range.Start, Acell.Range.End - 1)
       'MsgBox CR
            If IsNumeric(CR.Text) Then
            i = CR.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            CR.Text = q
            End If
        Next
    ElseIf Selection.Type = 4 Then
         For Each Acell In Selection.Cells
       Set CR = ActiveDocument.Range(Acell.Range.Start, Acell.Range.End - 1)
       'MsgBox CR
            If IsNumeric(CR.Text) Then
            i = CR.Text
            p = i / 10000
            q = Format(Round(p, 2), "#,##0.00;-#,##0.00; ")
            CR.Text = q
            End If
        Next
    End If
    Application.ScreenUpdating = True
    End Sub
    Sub 千分符() '选定千分位
     
    On Error Resume Next
    Dim i As Range, Acell As Cell, CR As Range
        On Error Resume Next
        Application.ScreenUpdating = False
        If Selection.Type = 2 Then '文档选定
                 For Each i In Selection.Words
                If IsNumeric(i) Then
                If i Like "####*" = True Then
                    If i.Next Like "." = True And i.Next(wdWord, 2) Like "#*" = True Then
                        i.SetRange Start:=i.Start, End:=i.Next(wdWord, 2).End
                        NC = Format(i, "#,##0.00;-#,##0.00; ")
                         i.Text = NC
                             Else
                          NC = Format(i, "#,##0.00;-#,##0.00; ")
                         i.Text = NC
     
                           End If
              End If
              End If
            Next i
        ElseIf Selection.Type = 4 Or Selection.Type = 5 Then '竖形表格(5为横形表格)
            For Each Acell In Selection.Cells
                Set CR = ActiveDocument.Range(Acell.Range.Start, Acell.Range.End - 1)
    '            MsgBox CR
                If CR Like "-####*" Or "-####.#*" = True Then
                      Yn = Format(CR, "#,##0.00;-#,##0.00; ")
                        CR.Text = Yn
                          Else
                    If CR Like "####*" Or "####.#*" = True Then
                   Yn = Format(CR, "#,##0.00;-#,##0.00; ")
                        CR.Text = Yn
                  End If
                   End If
            Next Acell
        Else
            MsgBox "您只能选定文本或者表格之一!", vbOK + vbInformation
        End If
        Application.ScreenUpdating = True
    Application.Activate
     
    End Sub
    

    第四步、设置快速访问栏

    bed2e2405c5a846115bc3650aa0e596d.png

    第五步、修改一下名称以及图标,搞定

    528bc04641d96a37e2a87a3d880fd6a1.png

    至此,这3个按钮已经被添加到了word快速访问栏了,大家可以测试一下~

    注意:这个模块内的代码有一定几率会被杀毒软件定期清理(防止宏病毒),如果哪天失效了,照上述步骤复制一遍代码就行了(到第三步即可),按钮已经不用设置了。


    2.word格式刷

    本文的格式刷,关注<茶瓜子的休闲馆>在后台回复“软件”获取下载地址,请用OFFICE的Word打开

    按所里的要求,我预置了一些格式做成了一个小窗体,展示如下:

    09cee374650f3821e56b6b6264da1268.png

    总共只有3个功能,界面如下:

    356587934d504b76e7883d99c78f3f23.png

    1、表格格式调整,分为单选和多选调整,如果你只需要调一个表,那么把光标点在这个表格的任意位置,点单选调整即可。如果要同时调多个表,那就要选中连续的几个表,点多选调整。 默认是没有勾“窗口和内容自动调整”的两个选项,勾了以后调出来的表可能会比较丑。(表格建议用单选调整,而且这个工具只能大致粗略的调一遍,肯定是要自己再细致调整的。) 2、段落格式调整,也是分为单选和多选,逻辑与上述一致,调单个段落只用点中段落中的任意位置,无需全选。多段调整则要连续全选段落。(段落可以一次性多选调整) 3、小标题的级次调整,无需多说

    4、这些格式我已经写死在VBA代码里面了,如果想更改的话,可以打开VBE编辑器,自己去里面翻翻代码,找到格式相关的关键字自己设置一下,代码都没有加密。

    使用注意:这个格式刷文档打开以后点“启动”,建议将弹出主窗体移至屏幕的一边,因为点完按钮后会弹出“完成”的提示框,这个框可能被主窗体挡住,造成假死的感觉(即你看不到提示框,因为它被挡住了,但是不关掉完成提示框,你就操作不了文档),如果假死按一下回车把“完成”提示框关掉即可。


    想学习更多的办公技巧或0基础入门VBA,可以关注微信公众号<茶瓜子的休闲馆>

    展开全文
  • 3.在弹对话框“数字”标签中设置日期格式。选择“日期”,在右侧选择合适的日期格式,单击“确定”按钮。4.设置完成后的日期格式如下图所示。扩展资料:Microsoft Excel是电子试算表程序(进行数字和预算运算的软件...

    如何在EXCEL中改变日期格式

    1.打开需置日期格式的excel表。

    2.选中日期所在的格,单击鼠键,选择“设置单元格格式”选项。

    3.在弹对话框“数字”标签中设置日期格式。选择“日期”,在右侧选择合适的日期格式,单击“确定”按钮。

    4.设置完成后的日期格式如下图所示。

    扩展资料:

    Microsoft Excel是电子试算表程序(进行数字和预算运算的软件程序),与Microsoft Word一样,它在市场拥有统治份额。它最初对占优势的Lotus 1-2-3是个竞争者,但最后它卖得比它多、快,于是它成为了实际标准。

    它适宜Windows和Macintosh平台。它的主要竞争者是OpenOffice.org Calc、AppleNumbers和CorelQuattro Pro。

    如何把excel中日期格式设置为2001-01-01

    Excel零基础之12-时间日期的格式设置

    excel中常规格式和日期格式的转换规则。

    excel日期格式不一致,怎么设置

    打开一个excel表格,里面的日期显示变成时分秒,而实际上它的值是正确的,所以是显示的问题

    右击该单元格,选择设置单元格格式

    在右边类型框中选择一个合适的格式

    点击确定,已经更改过来了

    excel表中,输入19871125,设置单元格日期格式后还是显示的是#######。为什么呢?

    输入不对,应该输入1987-11-25,或者可以使用分列。

    1中单元格。

    2、在数据中,点击分列。

    3、进入分列第一步,默认选项,点击一下步。

    4、第二步也默认选项,点击下一步。

    5、在第三步中,勾选日期,然后点击完成。

    6、点击完成后,即可设置日期格式。

    excel 如何设置日期格式?

    怎么设置日期格式统一?

    展开全文
  • word文档中的数字如何加上千分号?...手工添加,既费时费力,效率低,还会出错,那么如何高效地设置数字千位分隔符呢,下面就看看小编整理方法吧。方法一:将word中的数字或者表格直接粘贴到excel中,加...

    word文档中的数字如何加上千分号?

    我们在word文档中会写很多数据,有些带小数点,有些不带,但为了直观,需要把这些数据全部设置为“千位分隔符”的格式,如:100000.00元,转换为100,000.00元(每3位数加一个英文半角逗号)。手工添加,既费时费力,效率低,还会出错,那么如何高效地设置数字千位分隔符呢,下面就看看小编整理方法吧。

    方法一:将word中的数字或者表格直接粘贴到excel中,加上千分符号后再粘回去即可。

    方法二:通过查找替换命令。

    1、用CTRL+H快捷键,或者点击菜单或按钮调出替换命令窗口。

    2、“查找内容”中填入: ([0-9])([0-9]{3})([!][0-9年]),“替换”中填入:1,23。注意:在输入法为英文半角的状态输入。

    3、同时勾选使用通配符。

    4、然后执行“全部替换”。重复按“全部替换”按钮,直到提示“替换0处”为止。

    42749af3d1a9aaaeca51d5f5765bf917.png

    注:()[ ]{ }称为:通配符。

    ( ) 表达式,[ ] 范围内的任意单个字符,{ } 指定前一范围次数(勾选 “使用通配符”复选框让通配符设定的条件起作用)。

    意思是:查找不是0-9或者“年”之前的三位以上的数字(WORD默认从左到右顺序查找)。

    替换框中“1,23”的含义是:1代表查找框中第一个表达式,2代表查找框中第二个表达式,以此类推。意思是:按从左到右的顺序,在不是0-9或者“年”前的第四位数字后加千分位符(,)。如:10000000.00元,按第一次“全部替换”按钮为:10000,000.00元,按第二次“全部替换”按钮为:10,000,000.00元,按第三次“全部替换”按钮为:“替换0处”完成。

    呐,等你关注都等出蜘蛛网了~

    597bc380129089f67ce43cd52c4f6747.gif
    展开全文
  • ​1、数据前批量添加货币符号在Word表格中输入大量表示金额的数字时,每个金额数都要加上货币符号¥。一般情况下,要输入¥,通常会按住Alt键,在小键盘上连续键入0165这四个数字,然后松开ALT键就可以输入货币符号...
  • word排版助手 v4.1.zip

    2019-07-12 02:37:11
    其他功能如快速把word文件内的所有数字转变成带千分位的数字、对word文件内嵌的excel文件自动处理成word表格等都非常实用。   word排版助手 v4.1更新: 修正了在个别电脑上出现类型不匹配的错误
  • oracle学习文档 笔记 全面 深刻 详细 通俗易懂 doc word格式 清晰 第一章 Oracle入门 一、 数据库概述 数据库(Database)是按照数据结构来组织、存储和管理数据的仓库,它产生于距今五十年前。简单来说是本身可视...
  • word使用技巧大全

    热门讨论 2011-03-18 20:37:53
    54、迅速得出Word表格的行列数 91 55、我用Word来拆字 91 56、批量写贺卡和信封 91 57、Word中巧输星期 91 58、输入带圈字符 91 59、过滤网页内容 91 60、快速转换大写金额 92 61、去掉自动编号功能 92 62、去除绘图...
  • 事后更改格式二、访谈资料格式三、设置脚注编号格式四、设置页眉页脚(重点)五、排版易忽视项六、自动生成目录 一、将全文中字母和数字格式一次性修改为Times New Roman事前设置格式。 主要分为两种方法:第一种是...
  • 前两天,在群内遇到了一位学员的提问,他问:怎样在Word中为表格里的数字设置千位分隔符?万万没想到,这个看似简单的问题,居然在群内引起了一个关于工具选择和要效率还是要效果的讨论。找对的工具,往往能事半功倍...
  • 罗刚君Word精灵 v3.0.rar

    2019-07-13 05:22:16
    导出表格到Excel多表:导出表格时将每一个WORD表格保存在单独的工作表中,即WORD中有多少个表格,则在Excel中生成多少个工作表,逐一存放,同时还生成工作表目录。 批量缩放图片:按指定的倍数批量放大图片,或者按...
  • 65. 将WPS/WORD表格转换为EXCEL工作表 39 66. 取消单元格链接 40 67. 快速输入拼音 40 68. 插入“√” 41 69. 按小数点对齐 41 70. 对不同类型的单元格定义不同的输入法 41 71. 在EXCEL中快速插入WORD表格 42 72. ...
  • 4.掌握工作表的格式化:自定义格式化(设置数字格式、对齐格式、字体、边框线、图案、列宽和行高、条件格式),自动格式,格式的复制和删除。 5.掌握数据的图表化和地图:嵌入式图表和独立图表的概念,创建图表,...
  • 我们在利用WPS文档与Word文档进行日常办公时,经常需要在文档当中输入各种电话号码,但是如果想要成功隐藏号码中间的四位数该怎么办呢,我们在WPS表格当中都会隐藏,只需要在设置的单元格格式设置就可以了,但在...
  • 图片批量尺寸及嵌表格式导图、导入多行列图片具备18项可设置参数,多达80种组合导入方式,满足各行业不同需求的图片导入导出与规范排版。表达式计算精灵让数学函数及复杂公式表达式全自动计算一切变得那么轻巧与高效...
  • 边框和底纹)word里另存为pdf的格式,然后截图,或者直接word里截图,表格制作完成。2图片中写数字打开电脑自带画图工具,写上0-9,可用鼠标或者手写板,然后点击主页-&gt;重新调整大小点击像素,各设置为280*...
  • 对于超过12位的数字(包括12位),Excel会自动以科学记数法...启动Excel,根据Word表格的行列数选择要要复制到的区域(如果对数据格式无要求,也可以全选整个工作表)。 2.在选择区域上单击右键,选择“设置单元格格式
  • 备战二级

    2019-04-01 10:42:01
    选择题考点(数字表示有几份卷子中含有该题): 对象 栈 1 1 Word题考点: 必考:文本格式、段落格式、页面设置 常考: 页面设置 设置背景图片 插入目录 邮件合并 插入页码...
  • office宏

    千次阅读 2017-03-16 11:04:17
    最近在汇总别人写的word文档时,遇到一个问题, 一个文档中有n多格式相同的表格,里面的内容已经被别人填写好了. 表格的第行,第二列内容需要设置表格的编号,因为这个文档是之前大家汇总起来的,所以这个编号顺序是乱...
  • 1、word文本转化为表格 2、大写数字设置 3、单元格合并 4、保存加载宏 5、自动添加标题 6、设置表格边框 7、标题跨列居中 8、公式求值 9、选项设置加密 10、模板的保存 11、添加监视窗口 12、行列隐藏 13、保存设置...
  • 1、word文本转化为表格 2、大写数字设置 3、单元格合并 4、保存加载宏 5、自动添加标题 6、设置表格边框 7、标题跨列居中 8、公式求值 9、选项设置加密 10、模板的保存 11、添加监视窗口 12、行列隐藏 13、保存设置...
  • 拆分方法有两种,一种是用“对齐方式”中的选项拆分,另一种在“设置单元格格式”窗口中拆分。另外,一次可以只拆分一个单元格,也可以批量拆分多个单元格。除拆分单元格外,还可以拆分单元格内容,即把一个单元格中...
  • 8.3—8.4Excel学习笔记

    2020-08-03 21:07:58
    利用自动更正选项输入长文本: 可用于更正常见的录入错误或以短文本代替长文本 “工具”-“自动更正选项”-在“替换”栏(开始-查找-替换)输入如abc,设置“替换为”4300 ...设置条件格式,选中需要提醒的单元格K2,按
  • 将PDF转换为16种文档格式,包括Office(Word,Excel,PowerPoint),iWork(页面,数字,主题),EPUB,CSV,TXT,RTF和图像格式。满足您所有的转换需求。 准确的PDF转换准确 保留原始PDF字体样式,颜色,图形,表格...
  • 1.3.1 使用数字格式”快速添加货币符号 1.3.2 设置默认的货币格式 文秘应用 设置产值利润对比表 1.3.4 快速添加“会计专用”格式 1.4 自动填充数据 1.4.1 快速填充相同数据 1.4.2 填充有规律的数据 1.4.3 自定义填充...
  • 实例224 将数字字符串格式化为指定长度 实例225 限制Textarea文本域内容的长度 实例226 将长数字分位显示 实例227 将RGB格式的颜色值转换为十六进制 实例228 从指定URL中提取文件名 9.3 日期时间处理 实例229...
  • Free Spire.PDF for .NET 支持 PDF 到 Word、XPS、SVG、EMF、Text 和图片(EMF、JPG、PNG、BMP、TIFF)的格式转换。也支持从 XML、HTML、RTF、XPS、Text、图片等格式生成 PDF 文档。 2.文档操作及域功能。支持合并、...
  • 光标放在引用参考文献的地方,在菜单栏上选“插入︱脚注和尾注”,弹出的对话框中选择“尾注”,点击“选项”按钮修改编号格式为阿拉伯数字,位置为“文档结尾”,确定后Word就在光标的地方插入了参考文献的编号,...
  • PowerPoint.2007宝典 8/10

    2012-04-01 18:39:23
    5.8.4 覆盖一种版式的幻灯片母版格式设置 108 5.8.5 新建版式 109 5.8.6 重命名版式 109 5.8.7 复制和删除版式 110 5.8.8 在幻灯片母版间复制版式 110 5.9 管理幻灯片母版 110 5.9.1 创建和删除幻灯片...

空空如也

空空如也

1 2 3 4 5 6
收藏数 108
精华内容 43
关键字:

word表格设置数字格式