下载 > 资源分类 >  开发技术 >  VB > ExcelHome 扩展函数库2.1

ExcelHome 扩展函数库2.1

2005-12-02 上传大小:71KB

本软件为Excel加载宏程序,其中收集了由Excel Home为大家开发的各种实用函数,用以扩展Excel的计算功能。为了以示区别,本函数库中的函数名称全部由Excel Home的简称EH开头。因为本程序在VBA10下开发,故部分函数将无法在Excel97及其更低版本下使用。推荐使用 Excel 2000 或者 Excel XP。 <P><P>安装方法:<BR>
 先将本压缩包中的EHFL.xla解压至Office的安装目录下的"OfficeLibrary"中(例如:您的Office安装在"C:Program Files"中,那么您就把EHFL.xla解压至"C:Program FilesMicrosoft OfficeOfficeLibrary"里。)然后启动Excel,点击“工具”——“加载宏”,在“Excel Home扩展函数库”这个加载宏前面的框中打勾,最后按“确定”。这时将出现一个欢迎使用的对话框,到此就安装完成了。<P>使用方法:<BR> 本软件的功能在于扩展Excel的函数库,以使之更方便大家的工作。在按上述方法正确安装以后,使用方法与使用Excel内置函数完全相同。<P>详细说明:<BR> 本软件现仅包含以下函数:<BR>一、EHElapsed(StartDate As Date, EndDate As Date, ReturnType As Integer)<BR>这个函数的功能在于精确计算两日期的差值,精确到天,特别适用于工龄等处的计算。具体使用(甚至于源代码)已在Excel Home上进行无保留公布,在此即不复述。<P>二、EHDXRMB(Arab_number,Type)<BR> 这个函数的功能在于将指定的阿拉伯数字转换成相应的中文大写金额。<BR> 参数Type可选,如果其值为1或省略,则函数直接截取掉Arab_number两位以后的小数部分;如果其值为2,则函数对Arab_number两位以后的小数进行四舍五入。依此类推。<BR> 例如:EHDXRMB(1348.1)="壹仟叁佰肆拾捌元壹角整"<BR> EHDXRMB(20005.08)="贰万零伍元零捌分"<BR> 如果单元格A1=400,则EHDXRMB(A1)="肆佰元整"<P>三、EHPItax(Income, Option, Tax_deduction)<BR> 这个函数的功能在于根据工资、薪金值计算应纳个人所得税额及相应税率、速算扣除数。<BR> 参数Income必填,其为要计算的个人工资、薪金值。<BR> 参数Option可选,选择计算目标。如果不填,则默认值为1。当选择1时,函数将计算个人所得税额;当选择2时,函数将计算个人所得税率;当选择3时,函数将计算速处扣除数。<BR> 参数Tax_deduction可选,其为计算应纳税所得额的工资扣除数,如果不填,则默认值为800。<BR> 例如:EHPItax(1355)=30.5<BR> EHPItax(1355,1,1000)=17.75<BR> EHPItax(2533,2)=10%<BR> EHPItax(2533,3)=25<BR> 如果单元格A1=3350,则EHPItax(A1)=257.5<P>四、EHPItaxC(Income, Option, Tax_deduction)<BR> 这个函数的功能与用法与EHPItax相同,只不过计算基础是不含税工资。也就是在单位或个人为纳税义务人负担税款时,计算应纳税额及相关数据。<P>五、EHDXE(Arab_number,Type)<BR> 这个函数的功能在于将指定的阿拉伯数字转换成相应的美元金额。被转换数字的有效数字最高为12位。<BR> 参数Arab_number为要转换的阿拉伯数字,可以为数字,数学表达式及单元格引用。<BR>参数Type可选,如果其值为1或省略,则函数直接截取掉Arab_number两位以后的小数部分;如果其值为2,则函数对Arab_number两位以后的小数进行四舍五入。依此类推。<BR> 例如:ehdxe(1053.2)="one thousand fifty-three and cents twenty only"<BR> ehdxe(10000)="ten thousand only"<BR> ehdxe(10048303.09)="ten million forty-eight thousand three hundred three and cents nine only"<P>六、EHDXEC(Arab_number,Type)<BR> 这个函数的功能在于将指定的阿拉伯数字转换成相应的英文数字。被转换数字的有效数字最高为12位。本函数与EHDXE()的区别在于对于小数部分的转换方式不同,前者适用于金额结算时使用,而本函数则按标准读法进行转换。<BR> 参数Arab_number为要转换的阿拉伯数字,可以为数字,数学表达式及单元格引用。<BR>参数Type可选,如果其值为1或省略,则函数直接截取掉Arab_number两位以后的小数部分;如果其值为2,则函数对Arab_number两位以后的小数进行四舍五入。依此类推。<BR>例如:ehdxe(1053.2)="one thousand and fifty-three point twenty"<BR> ehdxe(10000)="ten thousand"<BR> ehdxec(10048303.09)="ten million forty-eight thousand three hundred and three point nine"<P>七、EHevo(number,power)<BR> 这个函数的功能在于对指定的数字进行开整数次方的计算。<BR> 参数number为要开方的数字,即底数,可以为数字,数学表达式及单元格引用。<BR> 参数power为开方的幂数,可选,缺省值为2。幂数必须为整数,非整数参数将被自动舍去小数部分。<BR>例如:ehevo(8,3)=2<BR> ehevo(4)=2<P>八、EHDcom(Source,Database)<BR> 此函数用于搜索目标字符串与数据列表中相匹配的值。<BR> 参数Source为目标字符串。<BR> 参数Database为数据列表区域。接受来自任意工作簿任意工作表的任意一列数据。<BR> 例如:A1、A2、A3值为“我爱北京天安门”“南京路上好八连”“桂林山水甲天下”;B1、B2、B3、B4值为“北京”“桂林”“南京”“杭州”,则<BR> EHDcom(A1,B1:B4) = “北京”<BR> EHDcom(A2,B1:B4) = “南京”<BR> EHDcom(A3,B1:B4) = “桂林”<P>九、EHInStrCount(UserStr, StrStart, StrQuantity)<BR> 此函数用于统计出一个字符串内某字符或字符串出现的次数。<BR> 参数UserStr为目标字符串。<BR> 参数StrStart为用于比较的字符或字符串在UserStr中出现的起始位置。参数StrQuantity为用于比较的字符或字符串的长度,可选,默认值为1。如UserStr为“ABCD”,StrStart为1,StrQuantity为1的话,则用于比较的字符是“A”;如UserStr为“ABCD”,StrStart为2,StrQuantity为1的话,则用于比较的字符是“B”;如UserStr为“ABCD”,StrStart为2,StrQuantity为2的话,则用于比较的字符是“BC”。<BR> 例如:A1为“ABCDABC”,则EHInStrCount(A1,1)=2<BR>EHInStrCount(A1,4)=1<BR>EHInStrCount(A1,1,2)=2<BR>EHInStrCount(A1,1,4)=1<P>十、EHInStrCountS(UserStr, ComPareStr)<BR> 此函数用于统计出一个字符串内某字符或字符串出现的次数。<BR> 参数UserStr为目标字符串。<BR> 参数ComPareStr为用于比较的字符或字符串。<BR> 例如:A1为“ABCDABC”,则<BR>EHInStrCount(A1,"D")=1<BR>EHInStrCount(A1,"AB")=2<BR>EHInStrCount(A1,"ABCD")=1<P><BR>十一、EHSuperSumR(FirstCell, LastCell, Odd_Even)<BR> 此函数用于计算某列数据中位于奇数或偶数行的数据。行号为奇数则视该行为奇数行,反之为偶数行。<BR> 参数FirstCell为计算列中的数据起始单元格。<BR> 参数LastCell为计算列中的数据结束单元格。<BR> 参数Odd_Even为定义计算的奇偶属性。1表示计算奇数行,2表示计算偶数行。可不填,默认是1,即计算奇数行的数据。<BR> 例如:A1:A10的值分别为1-10,则<BR> EHSuperSumR(A1,A10,1)=25<BR> EHSuperSumR(A1,A10,2)=30<BR> EHSuperSumR(A1,A10)=25<P>十二、EHSuperSumC(FirstCell, LastCell, Odd_Even)<BR> 此函数用于计算某行数据中位于奇数或偶数列的数据。列标为奇数则视该列为奇数列,反之为偶数列。<BR> 参数FirstCell为计算行中的数据起始单元格。<BR> 参数LastCell为计算行中的数据结束单元格。<BR> 参数Odd_Even为定义计算的奇偶属性。1表示计算奇数列,2表示计算偶数列。可不填,默认是1,即计算奇数列的数据。<BR> 例如:A1:H1的值分别为1-8,则<BR> EHSuperSumC(A1,H1,1)=16<BR> EHSuperSumC(A1,H1,2)=20<BR> EHSuperSumC(A1,H1)=16<P><BR> 本软件将不定期升级,加入更多更实用的函数,以方便大家的工作。如果您在实际工作中有这方面的需求,请联系本站,我们将尽量满足您的要求。 <BR> <BR> 注册说明:未注册的版本将会在每次启动Excel时显示本软件的版权窗体。如果您习惯通过文件关联方式打开Excel文件,则您第一次打开文件的操作只能启动Excel,无法同时打开文件。这是一个小小的麻烦,但并非本人的蓄意所为,应该算是 VBA for Excel 的一个小BUG。<BR> 如果您对这个软件满意,请向本人进行注册,注册费用为人民币66元。您可以选择由银行转帐或汇款进行付款。本人将在收到您的注册费用后把您注册的版本用Email发送给您!<BR> 请在给本人的来信中写明您要注册的软件名称、版本形式、付款方式以及您的联系信息。所有注册收入本人都将用于Excel Home的发展与维护。  
...展开收缩
综合评分:3.9(83位用户评分)
开通VIP C币充值 立即下载

评论共有5条

lmssww2014-02-27 08:32:38
不错已经用了
wwh500002013-09-05 09:49:32
音乐会影响同事,建议关掉
wzs19842013-06-03 12:14:31
非常好用,终于找到了

登录后才能评论

 

相关推荐

eval32 v3.2.6 Beta R1 ShellEval 数学表达式 动态解释计算 扩展函数库 立即下载
积分/C币:3
XJRegLib 注册表扩展函数库 1.0 B9 立即下载
积分/C币:3
PB消息解析扩展函数库 立即下载
积分/C币:3
MatComX_DLL数学计算扩展函数库.rar 立即下载
积分/C币:3
CAN-bus接口函数库使用手册 立即下载
积分/C币:10
C++函数库电子手册 立即下载
积分/C币:0
实用各种公共函数库 立即下载
积分/C币:3
openGl函数库 立即下载
积分/C币:0
怎样建立自己的函数库(c语言) 立即下载
积分/C币:2
英特尔 MKL(数学核心函数库)百度云下载 立即下载
积分/C币:8
使用VC实现EXCEL的函数库 立即下载
积分/C币:0
STM32F101与STM32103固件函数库 立即下载
积分/C币:10
opnet 核心函数库介绍 立即下载
积分/C币:8
notepad关联matlab的函数库 立即下载
积分/C币:0
《GNU C函数库参考手册》英文文字版 非扫描版 带标签 超清晰 立即下载
积分/C币:12
C语言函数库 立即下载
积分/C币:3
CAN-bus_通用测试软件及接口函数库使用手册(LINUX) 立即下载
积分/C币:0
蓝凤凰魔灵函数库 立即下载
积分/C币:0
stm32 函数库 立即下载
积分/C币:0
函数库_c语言 立即下载
积分/C币:0

热门专辑

VIP会员动态

关闭
img

spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
为了良好体验,不建议使用迅雷下载
确认下载
img

ExcelHome 扩展函数库2.1

会员到期时间: 剩余下载个数: 剩余C币:593 剩余积分:0
为了良好体验,不建议使用迅雷下载
VIP下载
您今日下载次数已达上限(为了良好下载体验及使用,每位用户24小时之内最多可下载20个资源)

积分不足!

资源所需积分/C币 当前拥有积分
您可以选择
开通VIP
4000万
程序员的必选
600万
绿色安全资源
现在开通
立省522元
或者
购买C币兑换积分 C币抽奖
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
(仅够下载10个资源)
为了良好体验,不建议使用迅雷下载
确认下载
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
为了良好体验,不建议使用迅雷下载
C币充值 开通VIP
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
您的积分不足,将扣除 10 C币
为了良好体验,不建议使用迅雷下载
确认下载
下载

兑换成功

你当前的下载分为234开始下载资源
你还不是VIP会员
开通VIP会员权限,免积分下载
立即开通

你下载资源过于频繁,请输入验证码

您因违反CSDN下载频道规则而被锁定帐户,如有疑问,请联络:webmaster@csdn.net!

举报

若举报审核通过,可奖励5下载分

  • 举报人:
  • 被举报人:
  • 举报的资源分:
  • *类型:
  • *详细原因: