小竅門:點(diǎn)擊圖片或把手機(jī)橫放能放大圖片! 方法: 自定義函數(shù)waihui 詳解 EXCEL2010舉例 1,、打開VBA 打開方法: ■ 開發(fā)工具 → 點(diǎn)擊:Visual Basic,。也可以用快捷鍵ALT+F11打開。 ■ 將“宏安全性”改為:?jiǎn)⒂盟泻辍?/span>
2,、工具欄:插入 → 點(diǎn)擊:模塊,,或者點(diǎn)擊:過程 →Function →輸入名稱:waihui
3、在編輯窗口輸入如下代碼: Function waihui(a) waihui = Round(Val(a * 6.824), 2) End Function 輸入完成后點(diǎn)擊保存按鈕,。 ●●● ■ Function 和End Function之間是運(yùn)算過程,,最后以End Function結(jié)束運(yùn)算過程。 ■ waihui是本例中自定義函數(shù)的名稱,。 ■ a為自定義函數(shù) waihui 的參數(shù),。 ■ waihui = Round(Val(a * 6.824), 2) 即為運(yùn)算的具體過程。 運(yùn)算過程解析: 美元轉(zhuǎn)換為人民幣,,即參數(shù) a 乘以美元匯率 6.824 ,,val函數(shù)返回字符串內(nèi)的數(shù)字,round+val函數(shù)組合的作用是計(jì)算結(jié)果保留2位小數(shù)點(diǎn),。僅僅用round函數(shù)不能達(dá)到保留小數(shù)點(diǎn)的作用,。 4、回到Excel工作表,,對(duì)自定義函數(shù)waihui進(jìn)行測(cè)試,。 A列為美元,,B列人民幣 在單元格B2輸入:=waihui(A2) 輸入完畢,按 ●●● 方法: 自定義函數(shù)geshui 詳解 EXCEL2010舉例 1,、打開VBA 打開方法同上: ■ 開發(fā)工具 → 點(diǎn)擊:Visual Basic,。也可以用快捷鍵ALT+F11打開。 ■ 將“宏安全性”改為:?jiǎn)⒂盟泻辍?/span> 2,、工具欄:插入 → 點(diǎn)擊:模塊,,或者點(diǎn)擊:過程 →Function →輸入名稱:geshui 3、在編輯窗口輸入如下代碼: Function geshui(a, Optional b) Dim i As Single, j As Single, x As Single If IsMissing(b) Then b = 3500 End If x = a - b Select Case x Case 0 To 1500 i = 0.03 j = 0 Case 1500.01 To 4500 i = 0.1 j = 105 Case 4500.01 To 9000 i = 0.2 j = 555 Case 9000.01 To 35000 i = 0.25 j = 1005 Case 35000.01 To 55000 i = 0.3 j = 2755 Case 55000.01 To 80000 i = 0.35 j = 5505 Case Else i = 0.45 j = 13505 End Select If x <= 0="">=> geshui = 0 Else geshui = Round(Val(x * i - j), 2) End If End Function 輸入完成后點(diǎn)擊保存,。(顯示限制,,將文字注釋省略,詳細(xì)注釋見下圖)
■ 自定義函數(shù)的名稱為:geshui ■ a和b為自定義函數(shù) geshui的參數(shù) a為工資額,,b為起征點(diǎn),。b參數(shù)前加Optional 表示:可省略 ■ If IsMissing(b) Then b = 3500 如省略b參數(shù),默認(rèn)等于3500 ■ Dim i As Single, j As Single, x As Single 設(shè)置(Dim)變量 i ,、j ,、x為(As)數(shù)值類型(Single)。 i 為稅率,,j 為速算扣除數(shù),,x 為應(yīng)納稅所得額 4、回到Excel工作表,,對(duì)自定義函數(shù)geshui進(jìn)行測(cè)試,。 A列為工資,B列為個(gè)稅 在單元格B2輸入:=geshui(A2) 輸入完畢,,按
小貼士: Function特點(diǎn):至少有一次返回某個(gè)確定的值,賦值給自定義函數(shù),。 避免重名:避免使用Excel內(nèi)置函數(shù)名稱,、單元格引用、單元格區(qū)域的名稱作為自定義函數(shù)過程的名稱,。 使用自定義函數(shù):Function過程可以應(yīng)用在工作表公式中,,就像Excel的內(nèi)置函數(shù)一樣使用。 PS:您也可以留言給我,,我會(huì)及時(shí)給您答復(fù),! |
|