1

尊敬的家长：

您好！ 

春节临近，幼儿园本学期的各项工作已圆满结束了。为了让您的孩子度过一个“安全、健康、快乐、实践、有益”的假期，在此，我们给大家几点建议，希望对您有所帮助。

        在深圳市卫生局、深圳市教育局联合举办的全市卫生保健工作大检查中，我园又被评为2010—2011学年度深圳市卫生保健优秀幼儿园。这已经是我们连续多年获得该项荣誉了。我们将继续保持这项优良传统，更好地为孩子提供良好的学习、生活环境。

 

今天看到一个比较好的自定义函数，留下来与大写分享。

就是中文的大写数字转为小写，一般的我们都是小写转大写，这个是反其道而行之。

Function 数字(a As String)
Application.Volatile True
Hsf = "分角元拾佰仟万   亿"
Hs = "零壹贰叁肆伍陆柒捌玖 "
JH = 1
Dim AA As String
a = Replace(a, "整", "")
a = Replace(a, "亿", ")亿")
a = Replace(a, "万", ")万")
If a <> "" And Left(a, 1) <> "负" Then
Mylen = Len(a$)
For m = 1 To Mylen

小写数字转英文的自定义函数：

Function 英文大写(ByVal MyNumber)
Dim Dollars, Cents, temp
Dim DecimalPlace, Count
ReDim Place(9) As String
Application.Volatile True
Place(2) = " Thousand "
Place(3) = " Million "
Place(4) = " Billion "
Place(5) = " Trillion "
MyNumber = Trim(Str(MyNumber))
DecimalPlace = InStr(MyNumber, ".")
If DecimalPlace > 0 Then
Cents = GetTens(Left(Mid(MyNumber,

        这天,白云酒楼里来了两位客人,一男一女,四十岁上下,穿着不俗,男的还拎着一个旅行包,看样子是一对出来旅游的夫妻.
　　服务员笑吟吟地送上菜单.男的接过菜单直接递女的,说:"你点吧,想吃什么点什么."女的连看也不看一眼,抬头对服务员说:"给我们来碗馄饨就行了!"

　　服务员一怔,哪有到白云酒楼吃馄饨的?再说,酒楼里也没,她以为自己没听清楚,不安的望着那个女顾客.女人又把自己的话重复了一遍,旁边的男人这时候发话了:"吃什么馄饨,又不是没钱?"

　　女人摇摇头说:"我就是要吃馄饨!"

插入随机变更的时间函数

在单元格中输入后面的函数即可=TEXT(NOW(),"[DBNum2][$-804]"&"yyyy年m月d日").

网页文章无法复制的——最简单的绝招

很多资料性的网络文章，往往在网页禁止使用“复制”、“粘贴”命令。
破解方法很简单： 单击IE浏览器的“工具”——“internet选项”——“安全”，将其中的“internet”的安全级别设为最高级别，“确定”后刷新网页即可。
安全级别最高的时候，一切控件和脚本均不能运行，再厉害的网页限制手段统统全部作废。

如何锁定制定的单元格

全选工作表，格式——单元格——保护
把“锁定”那个选定取消掉
选中需要保护的部分，格式——单元格——保护
设为锁定。

然后 工具——保护——保护工作表 可以设密码

就是说，当工作表被保护的时候，单元格格式处于“锁定”状态的，保护有效，其他部分可修改。

人民币金额大小写在Excel表格中的转换

在需要转换的单元格中输入：

=CONCATENATE(IF(TRUNC(E**)<>0,TEXT(TRUNC(E**),"[DBNum2]G/通用格式")&"圆",""),IF(TRUNC(E**,1)-TRUNC(E**)<>0,TEXT(ROUND((TRUNC(E**,1)-TRUNC(E12))*10,0),"[DBNum2]G/通用格式")&"角",""),IF(TRUNC(E**,2)-TRUNC(E**,1)<>0,TEXT(ROUND((TRUNC(E**,3)-TRUNC(E**,1))*100,0),"[DBNum2]G/通用格式")&"分",""),"整")

备注：其中E**为数值所在单元格.