作者：乔山办公网日期：
返回目录：excel表格制作
设置B5：自动换行、居中
B5=B1&CHAR(10)&B2&CHAR(10)&B3&CHAR(10)&B4
供参考
将自定义函数存放在个人宏工作簿即可.
Function countcolor(rng As Range)
For Each rng In Rang("A1:A10")
If rng.Interior.Color = RGB(255, 255, 0) Then
countcolor = countcolor + 1
End If
Next rng
End Function
试试来行源不。zd
EXCEL 2007如果没有启动宏，则自定义函数无法使用，我摸索了好知久才发现，特地做了一个图片说明，可以参考一下。
除此之外，要公用函数，还需要道做加载宏内的管理才可以。
另外，将含有自定义函数的工作簿保存为加载宏文件，然后在容工具—加载宏中将其加载，即可像自带函数一样使用。