本軟件為Excel加載宏程序,其中收集了由Excel Home為大家開(kāi)發(fā)的各種實(shí)用函數(shù),用以擴(kuò)展Excel的計(jì)算功能。為了以示區(qū)別,本函數(shù)庫(kù)中的函數(shù)名稱全部由Excel Home的簡(jiǎn)稱EH開(kāi)頭。因?yàn)楸境绦蛟赩BA10下開(kāi)發(fā),故部分函數(shù)將無(wú)法在Excel97及其更低版本下使用。推薦使用 Excel 2000 或者 Excel XP。
安裝方法: 先將本壓縮包中的EHFL.xla解壓至Office的安裝目錄下的"Office\Library\"中(例如:您的Office安裝在"C:\Program Files\"中,那么您就把EHFL.xla解壓至"C:\Program Files\Microsoft Office\Office\Library\"里。)然后啟動(dòng)Excel,點(diǎn)擊“工具”——“加載宏”,在“Excel Home擴(kuò)展函數(shù)庫(kù)”這個(gè)加載宏前面的框中打勾,最后按“確定”。這時(shí)將出現(xiàn)一個(gè)歡迎使用的對(duì)話框,到此就安裝完成了。
使用方法: 本軟件的功能在于擴(kuò)展Excel的函數(shù)庫(kù),以使之更方便大家的工作。在按上述方法正確安裝以后,使用方法與使用Excel內(nèi)置函數(shù)完全相同。
詳細(xì)說(shuō)明: 本軟件現(xiàn)僅包含以下函數(shù): 一、EHElapsed(StartDate As Date, EndDate As Date, ReturnType As Integer) 這個(gè)函數(shù)的功能在于精確計(jì)算兩日期的差值,精確到天,特別適用于工齡等處的計(jì)算。具體使用(甚至于源代碼)已在Excel Home上進(jìn)行無(wú)保留公布,在此即不復(fù)述。
二、EHDXRMB(Arab_number,Type) 這個(gè)函數(shù)的功能在于將指定的阿拉伯?dāng)?shù)字轉(zhuǎn)換成相應(yīng)的中文大寫(xiě)金額。 參數(shù)Type可選,如果其值為1或省略,則函數(shù)直接截取掉Arab_number兩位以后的小數(shù)部分;如果其值為2,則函數(shù)對(duì)Arab_number兩位以后的小數(shù)進(jìn)行四舍五入。依此類推。 例如:EHDXRMB(1348.1)="壹仟叁佰肆拾捌元壹角整" EHDXRMB(20005.08)="貳萬(wàn)零伍元零捌分" 如果單元格A1=400,則EHDXRMB(A1)="肆佰元整"
三、EHPItax(Income, Option, Tax_deduction) 這個(gè)函數(shù)的功能在于根據(jù)工資、薪金值計(jì)算應(yīng)納個(gè)人所得稅額及相應(yīng)稅率、速算扣除數(shù)。 參數(shù)Income必填,其為要計(jì)算的個(gè)人工資、薪金值。 參數(shù)Option可選,選擇計(jì)算目標(biāo)。如果不填,則默認(rèn)值為1。當(dāng)選擇1時(shí),函數(shù)將計(jì)算個(gè)人所得稅額;當(dāng)選擇2時(shí),函數(shù)將計(jì)算個(gè)人所得稅率;當(dāng)選擇3時(shí),函數(shù)將計(jì)算速處扣除數(shù)。 參數(shù)Tax_deduction可選,其為計(jì)算應(yīng)納稅所得額的工資扣除數(shù),如果不填,則默認(rèn)值為800。 例如:EHPItax(1355)=30.5 EHPItax(1355,1,1000)=17.75 EHPItax(2533,2)=10% EHPItax(2533,3)=25 如果單元格A1=3350,則EHPItax(A1)=257.5
四、EHPItaxC(Income, Option, Tax_deduction) 這個(gè)函數(shù)的功能與用法與EHPItax相同,只不過(guò)計(jì)算基礎(chǔ)是不含稅工資。也就是在單位或個(gè)人為納稅義務(wù)人負(fù)擔(dān)稅款時(shí),計(jì)算應(yīng)納稅額及相關(guān)數(shù)據(jù)。
五、EHDXE(Arab_number,Type) 這個(gè)函數(shù)的功能在于將指定的阿拉伯?dāng)?shù)字轉(zhuǎn)換成相應(yīng)的美元金額。被轉(zhuǎn)換數(shù)字的有效數(shù)字最高為12位。 參數(shù)Arab_number為要轉(zhuǎn)換的阿拉伯?dāng)?shù)字,可以為數(shù)字,數(shù)學(xué)表達(dá)式及單元格引用。 參數(shù)Type可選,如果其值為1或省略,則函數(shù)直接截取掉Arab_number兩位以后的小數(shù)部分;如果其值為2,則函數(shù)對(duì)Arab_number兩位以后的小數(shù)進(jìn)行四舍五入。依此類推。 例如:ehdxe(1053.2)="one thousand fifty-three and cents twenty only" ehdxe(10000)="ten thousand only" ehdxe(10048303.09)="ten million forty-eight thousand three hundred three and cents nine only"
六、EHDXEC(Arab_number,Type) 這個(gè)函數(shù)的功能在于將指定的阿拉伯?dāng)?shù)字轉(zhuǎn)換成相應(yīng)的英文數(shù)字。被轉(zhuǎn)換數(shù)字的有效數(shù)字最高為12位。本函數(shù)與EHDXE()的區(qū)別在于對(duì)于小數(shù)部分的轉(zhuǎn)換方式不同,前者適用于金額結(jié)算時(shí)使用,而本函數(shù)則按標(biāo)準(zhǔn)讀法進(jìn)行轉(zhuǎn)換。 參數(shù)Arab_number為要轉(zhuǎn)換的阿拉伯?dāng)?shù)字,可以為數(shù)字,數(shù)學(xué)表達(dá)式及單元格引用。 參數(shù)Type可選,如果其值為1或省略,則函數(shù)直接截取掉Arab_number兩位以后的小數(shù)部分;如果其值為2,則函數(shù)對(duì)Arab_number兩位以后的小數(shù)進(jìn)行四舍五入。依此類推。 例如:ehdxe(1053.2)="one thousand and fifty-three point twenty" ehdxe(10000)="ten thousand" ehdxec(10048303.09)="ten million forty-eight thousand three hundred and three point nine"
七、EHevo(number,power) 這個(gè)函數(shù)的功能在于對(duì)指定的數(shù)字進(jìn)行開(kāi)整數(shù)次方的計(jì)算。 參數(shù)number為要開(kāi)方的數(shù)字,即底數(shù),可以為數(shù)字,數(shù)學(xué)表達(dá)式及單元格引用。 參數(shù)power為開(kāi)方的冪數(shù),可選,缺省值為2。冪數(shù)必須為整數(shù),非整數(shù)參數(shù)將被自動(dòng)舍去小數(shù)部分。 例如:ehevo(8,3)=2 ehevo(4)=2
八、EHDcom(Source,Database) 此函數(shù)用于搜索目標(biāo)字符串與數(shù)據(jù)列表中相匹配的值。 參數(shù)Source為目標(biāo)字符串。 參數(shù)Database為數(shù)據(jù)列表區(qū)域。接受來(lái)自任意工作簿任意工作表的任意一列數(shù)據(jù)。 例如:A1、A2、A3值為“我愛(ài)北京天安門”“南京路上好八連”“桂林山水甲天下”;B1、B2、B3、B4值為“北京”“桂林”“南京”“杭州”,則 EHDcom(A1,B1:B4) = “北京” EHDcom(A2,B1:B4) = “南京” EHDcom(A3,B1:B4) = “桂林”
九、EHInStrCount(UserStr, StrStart, StrQuantity) 此函數(shù)用于統(tǒng)計(jì)出一個(gè)字符串內(nèi)某字符或字符串出現(xiàn)的次數(shù)。 參數(shù)UserStr為目標(biāo)字符串。 參數(shù)StrStart為用于比較的字符或字符串在UserStr中出現(xiàn)的起始位置。參數(shù)StrQuantity為用于比較的字符或字符串的長(zhǎng)度,可選,默認(rèn)值為1。如UserStr為“ABCD”,StrStart為1,StrQuantity為1的話,則用于比較的字符是“A”;如UserStr為“ABCD”,StrStart為2,StrQuantity為1的話,則用于比較的字符是“B”;如UserStr為“ABCD”,StrStart為2,StrQuantity為2的話,則用于比較的字符是“BC”。 例如:A1為“ABCDABC”,則EHInStrCount(A1,1)=2 EHInStrCount(A1,4)=1 EHInStrCount(A1,1,2)=2 EHInStrCount(A1,1,4)=1
十、EHInStrCountS(UserStr, ComPareStr) 此函數(shù)用于統(tǒng)計(jì)出一個(gè)字符串內(nèi)某字符或字符串出現(xiàn)的次數(shù)。 參數(shù)UserStr為目標(biāo)字符串。 參數(shù)ComPareStr為用于比較的字符或字符串。 例如:A1為“ABCDABC”,則 EHInStrCount(A1,"D")=1 EHInStrCount(A1,"AB")=2 EHInStrCount(A1,"ABCD")=1
十一、EHSuperSumR(FirstCell, LastCell, Odd_Even) 此函數(shù)用于計(jì)算某列數(shù)據(jù)中位于奇數(shù)或偶數(shù)行的數(shù)據(jù)。行號(hào)為奇數(shù)則視該行為奇數(shù)行,反之為偶數(shù)行。 參數(shù)FirstCell為計(jì)算列中的數(shù)據(jù)起始單元格。 參數(shù)LastCell為計(jì)算列中的數(shù)據(jù)結(jié)束單元格。 參數(shù)Odd_Even為定義計(jì)算的奇偶屬性。1表示計(jì)算奇數(shù)行,2表示計(jì)算偶數(shù)行?刹惶睿J(rèn)是1,即計(jì)算奇數(shù)行的數(shù)據(jù)。 例如:A1:A10的值分別為1-10,則 EHSuperSumR(A1,A10,1)=25 EHSuperSumR(A1,A10,2)=30 EHSuperSumR(A1,A10)=25
十二、EHSuperSumC(FirstCell, LastCell, Odd_Even) 此函數(shù)用于計(jì)算某行數(shù)據(jù)中位于奇數(shù)或偶數(shù)列的數(shù)據(jù)。列標(biāo)為奇數(shù)則視該列為奇數(shù)列,反之為偶數(shù)列。 參數(shù)FirstCell為計(jì)算行中的數(shù)據(jù)起始單元格。 參數(shù)LastCell為計(jì)算行中的數(shù)據(jù)結(jié)束單元格。 參數(shù)Odd_Even為定義計(jì)算的奇偶屬性。1表示計(jì)算奇數(shù)列,2表示計(jì)算偶數(shù)列。可不填,默認(rèn)是1,即計(jì)算奇數(shù)列的數(shù)據(jù)。 例如:A1:H1的值分別為1-8,則 EHSuperSumC(A1,H1,1)=16 EHSuperSumC(A1,H1,2)=20 EHSuperSumC(A1,H1)=16
本軟件將不定期升級(jí),加入更多更實(shí)用的函數(shù),以方便大家的工作。如果您在實(shí)際工作中有這方面的需求,請(qǐng)聯(lián)系本站,我們將盡量滿足您的要求。 注冊(cè)說(shuō)明:未注冊(cè)的版本將會(huì)在每次啟動(dòng)Excel時(shí)顯示本軟件的版權(quán)窗體。如果您習(xí)慣通過(guò)文件關(guān)聯(lián)方式打開(kāi)Excel文件,則您第一次打開(kāi)文件的操作只能啟動(dòng)Excel,無(wú)法同時(shí)打開(kāi)文件。這是一個(gè)小小的麻煩,但并非本人的蓄意所為,應(yīng)該算是 VBA for Excel 的一個(gè)小BUG。 如果您對(duì)這個(gè)軟件滿意,請(qǐng)向本人進(jìn)行注冊(cè),注冊(cè)費(fèi)用為人民幣66元。您可以選擇由銀行轉(zhuǎn)帳或匯款進(jìn)行付款。本人將在收到您的注冊(cè)費(fèi)用后把您注冊(cè)的版本用Email發(fā)送給您! 請(qǐng)?jiān)诮o本人的來(lái)信中寫(xiě)明您要注冊(cè)的軟件名稱、版本形式、付款方式以及您的聯(lián)系信息。所有注冊(cè)收入本人都將用于Excel Home的發(fā)展與維護(hù)。
下載地址:http://m.mzhfr.cn/off/uploads/soft/200504/20050420112021662.zip |