作者：乔山办公网日期：
返回目录：excel表格制作
1. =b2+c2+d2
2. 在e1单元格中输入=b1+c1-d1 ,然后横向复制公式即可。即把鼠标放在E1单元格的右下角呈现出实心十字鼠标样式，向右拖动。
代表数组知，你横向选定六个连续的单元格，道在编辑栏输入“=0.05*{1，2，3，3，4，5}”，然后按Shift+Ctrl+Enter,来输入该数组公式专，则在这六个单元格会显示：0.05 0.1 0.15 0.15 0.2 0.25
是0.05分别属乘以1，2，3，3，4，5的结果。
以在EXCEL2中插入EXCEL1为例，步骤如下：
1、打开EXCEL2，在EXCEL2的菜单栏中选zhidao择【插入】；
2、在【插入】选项中，找到文本的【对象内】选项，点击【对象】，进入；
3、在【对象】选项中，选容择【由文件创建】；
4、在【由文件创建】中，选择【浏览】；
5、在弹出窗口，找到需要插入的EXCEL1（EXCEL1路径），选择【插入】，将EXCEL1插入到EXCEL2。
当单元格文字方向设置为竖排时，单元格会按字符一个一个的竖向排列，数字自然就会拆开了
解决这个问题的办法有下边几个：
将单元格设置为“自动换行”，将列宽调整至大约一个文字的宽度，这样文字也能竖向显示，而且因为数字较汉字的宽度较窄，两个数字的宽度跟一个汉字的宽度一致，能横排显示，缺点是但最高于7a686964616fe4b893e5b19e363三位数，而且列宽受限，不能太宽；
利用强制换行，在需要换行的字符后添加一个强制换行符，“alt+enter”，缺点就是如果字符很多，会很麻烦；
利用VBA自定义函数
代码如下
Function sx(x)
s1 = ""
For i = 1 To Len(x)
b = Mid(x, i, 1)
c = Asc(b)
If c < 48 Or c > 57 Then s1 = s1 & b Else GoTo line1
Next i
line1:
s2 = ""
For i = 1 To Len(x)
b = Mid(x, i, 1)
c = Asc(b)
If c >= 48 And c <= 57 Then s2 = s2 & b
Next i
s3 = ""
For i = Len(x) To 1 Step -1
b = Mid(x, i, 1)
c = Asc(b)
If c >= 48 And c <= 57 Then
For j = i + 1 To Len(x)
s3 = s3 & Mid(x, j, 1)
Next j
GoTo line100
End If
Next i
line100:
s = ""
For i = 1 To Len(s1)
b = Mid(s1, i, 1)
s = s & Chr(10) & b
Next i
s = s & Chr(10) & s2
For i = 1 To Len(s3)
b = Mid(s3, i, 1)
s = s & Chr(10) & b
Next i
sx = s
End Functio