[给新手]在vba中使用excel工作表函数

《[给新手]在vba中使用excel工作表函数》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、［给新手］在VBA中使用Excel工作表函数很多朋友不知道怎样在VBA中使用工作农函数，在这里把Excel帮助中的相关内容贴出，希望对新手有所帮助相关内容可以在VBE模式中按F1帮助中搜索“工作表两数”得到其实我们在用VBA时很多不明白的东西在VBA帮助里都冇-•些详细的说明，在遇到困难时希望先看看帮助!请参阅示例特性在VisualBasic语句中可以使用大多数MicrosoftExcel工作表两数。若要查看可以使用的工作表函数列表，请参阅VisualBasic可使用的工作表函数列表。注意一些工作表函数在VisualBasic中是不实用的。例如：Concatena

2、te朗数就不实用，因为在VisualBasic中可使用&运算符来连接多个文本值。从VisualBasic中调用工作表函数在VisualBasic中，通过WorksheetFunction对象可使用MicrosoftExcel工作表函数。以下Sub过程使用Min工作表函数來决定在某个单元格区域中的最小值。首先，将变量myRange声明为Range对象，然后将其设置为Sheetl上的A1:C10单元格区域。指定另一个变量answer为对myRange应用Min函数的结果。最后，answer的值就被显示在消息框中。SubUseFunction()DimmyRangeAs

3、RangeSetmyRange=Worksheets("Sheet1'*).Range(HA1:C10")answer=Application.WorksheetFunction.Min(myRange)MsgBoxanswerEndSub如果您使用的工作表函数需耍-•个单元格区域引用作为参数，则必须指定-•个Range対彖。例如：您可以用Match工作表函数搜索单元格区域。可以在工作表单元格屮输入公式，如“=MATCH(9,A1:A10,0)”。但是，您应在VisualBasic过程中指定一个Range对象來获取相同的结果。SubFindFirst()myVar

4、=Application.WorksheetFunction.Match(9,Worksheets(1).Range("A1:A10"),0)MsgBoxmyVarEndSub注意VisualBasic函数不使用WorksheetFunction识别符。函数可能和MicrosoftExcel的函数同名但作用各异。例如：Application.WorksheetFunction.Log和Log将返回不同的值。在单元格中插入工作表函数若要在单元格中插入工作表函数，诸指定函数作为相应的Range对象的Formula属性值。以下示例中，将RAND工作表函数(可生成随机数)

5、赋给了活动工作簿中Sheetl上A1:B3单元格区域的Formula属性。SubInsertFormula()Worksheets(”Sheets”).Range(“A1:B3”).Formula=”=RAND()”EndSub示例木示例使用工作表函数Pmt來计算住宅抵押贷款的支付额。请注毬本示例使用的是InputBox方法,而不是InputBox函数，因此该方法可以执行类型检査。Static语句使VisualBasic保留三个变戢的值;当下次运行该程序时，这些变量将显示为默认值。StaticloanAmtStaticloanlntStaticloanTermlo

6、anAmt=Application」nputBox_(Prompt:=HLoanamount(100,000forexample)11,_Default:=loanAmt,Type:=1)loanlnt=ApplicatioputBox_(Prompt:=HAnnualinterestrate(8.75forexample)11,_Default:=loanlnt,Type:=1)loanTerm=ApplicatioruinputBox_(Prompt:=nTerminyears(30forexample)11,_Default:=loanTerm,Type:=

7、1)payment=Application.WorksheetFunction_.Pmt(loanlnt/1200,loanTerm*12,loanAmt)MsgBox"Monthlypaymentis”&Format(payment,"Currency”)可用于VisualBasic的工作表函数列表AAcosAcoshAndAsinAsinhAtan2AtanhAveDevAverageBBetaDistBetalnvBinomDistcCeilingChiDistChilnvChiTestChooseCleanCombinConfidenceCorrelCos

8、hCoun