需要的请访问网盘pan.baidu.com/s/1CFXXC或留邮箱吧 财务管理素材与模板\主要产品成本分析.xlt 财务管理素材与模板\利润表.xlt 财务管理素材与模板\利

1. API之网络函数6. API之菜单函数 2. API之消息函数8. API之绘图函数 3. API之文件处理函数9. API之设备场景函数 4. API之打印函数11. API之进程和线

学习资料是为了方便我办公用的，因此有空时才会回帖或回邮件，不便之处，敬请体谅。 大家有空的话，常来此贴谈谈EXCEL财务会计处理中遇到的问题或分享

表格颜色 Cells().Interior.ColorIndex =4 窗体颜色 UserForm1.BackColor = &4

VBA测试函数 IsNumeric(x)‘是否为数字,返回Boolean结果，TrueorFalse IsDate(x)‘是否是日期,返回Boolean结果，TrueorFalse IsEmpty（x）‘是否为Emp

**************** * 定制模块行为 * **************** Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示 Option Compare Text '字符串不区分大小写 Option Base 1 '指定数组的第一个下标为 1 On Error Resume Next '忽略错误继续执行 VBA代码,避免出现错误消息 On Error GoTo ErrorHandler '当错误发生时跳转到过程中的某个位置 On Error GoTo 0 '恢复正常的错误提示 Application.DisplayAlerts=False '在程序执行过程中使出

亲爱的各位吧友：欢迎来到excel高效办公