如何用word打累加符号,累加,符号

1.word2003累计加数怎么加

Word中表格也有计算功能的。

在相应的单元格里，点击菜单“插入”/“域”，然后，在“域代码”里面写公式，公式的格式和Excel一样，比如：A1+3或者B2+B5，一些函数也是可以用的。

不过，每次改变了表中相应的数，要进行“更新域”，不能像Excel里一样自动变化。

如果非得在Word里做，也可以，不过太马乏。

方法：

1、竖向相加：在表格下面的空单元格里，点菜单栏的表格-〉公式，默认的就是=SUM(ABOVE)，如果要其他函数，就从“粘贴函数”选。如果计算几个指定单元格的和，这样写：=SUM(A1:A3,B5)。

2、横向相减：和上面一样。比如 =A1-B1-C1

如果表格里数据变了，必须对公式计算出的数值手动更新，方法：选定公式所在的单元格，右键，更新域。

?fr=qrl

2.请问如何在word里输入数字的时候能自动加上千分符和.00这样的两位

其他输入法不清楚，搜狗输入法先输入v再输入数字会出现千分位形式，但.00还是要自己输入

有一段宏代码运行后可以自动给数字加千分位及两位小数位

转帖

在Word中也实现数字自动千分位格式

这个方法比较好。收藏一下。（转自“中国会计视野论坛”里zhufree朋友的帖子。）

打开WORD程序，在上方菜单区域中，右键单击，选中Visual Basic。点击“Visual Basic编辑器”图标，打开Visual Basic，在“ThisDocument ”中双击，然后在右边的窗口中复制下方的代码：

2、对所有的数字加千分位，并且自动加上尾数.00

Sub yycealjj1()

'本代码旨在解决WORD中数据转化为千分位

'数据限定要求：-922,337,203,685,477.5808 到 922,337,203,685,477.5807

'转化结果1000以上数据以千分位计算，小数点右侧保留二位小数；1000以下数据不变

Dim myRange As Range, i As Byte, myValue As Currency

On Error Resume Next

Application.ScreenUpdating = False '关闭屏幕更新

NextFind: Set myRange = ActiveDocument.Content '定义为主文档文字部分

With myRange.Find '查找

.ClearFormatting '清除格式

.Text = "[0-9]{4,15}" '4到15位数据

.MatchWildcards = True '使用通配符

Do While .Execute '每次查找成功

i = 2 '起始值为2

'如果是有小数点

If myRange.Next(wdCharacter, 1) = "." Then

'进行一个未知循环

While myRange.Next(wdCharacter, i) Like "#"

i = i + 1 '只要是[0-9]任意数字则累加

Wend

'重新定义RANGE对象

myRange.SetRange myRange.Start, myRange.End + i - 1

End If

myValue = VBA.Val(myRange) '保险起见转换为数据，也可省略

myRange = VBA.Format(myValue, "Standard") '转为千分位格式

GoTo NextFind '转到指定行

Loop

End With

Application.ScreenUpdating = True '恢复屏幕更新

End Sub

关闭Visual Basic编辑器，回到WORD界面。输入文章后，点击“运行宏”图标，运行yycealjj1宏，即可对数字加千分位。（可以插入模板，以后而要时加载即可。）