在 Visual Basic 中使用 Microsoft Excel 工作表函数.doc

《在 Visual Basic 中使用 Microsoft Excel 工作表函数.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、在VisualBasic中使用MicrosoftExcel工作表函数在VisualBasic语句中可以使用大多数MicrosoftExcel工作表函数。若要查看可以使用的工作表函数列表，请参阅VisualBasic可使用的工作表函数列表。注意  一些工作表函数在VisualBasic中是不实用的。例如：Concatenate函数就不实用，因为在VisualBasic中可使用&运算符来连接多个文本值。从VisualBasic中调用工作表函数在VisualBasic中，通过WorksheetFunction对象可使用MicrosoftExcel工作表函数。以下

2、Sub过程使用Min工作表函数来决定在某个单元格区域中的最小值。首先，将变量myRange声明为Range对象，然后将其设置为Sheet1上的A1:C10单元格区域。指定另一个变量answer为对myRange应用Min函数的结果。最后，answer的值就被显示在消息框中。SubUseFunction()   DimmyRangeAsRange   SetmyRange=Worksheets("Sheet1").Range("A1:C10")   answer=Application.WorksheetFunction.Min(myRange)   Msg

3、BoxanswerEndSub如果您使用的工作表函数需要一个单元格区域引用作为参数，则必须指定一个Range对象。例如：您可以用Match工作表函数搜索单元格区域。可以在工作表单元格中输入公式，如“=MATCH(9,A1:A10,0)”。但是，您应在VisualBasic过程中指定一个Range对象来获取相同的结果。SubFindFirst()   myVar=Application.WorksheetFunction_       .Match(9,Worksheets(1).Range("A1:A10"),0)   MsgBoxmyVarEndSub注

4、意  VisualBasic函数不使用WorksheetFunction识别符。函数可能和MicrosoftExcel的函数同名但作用各异。例如：Application.WorksheetFunction.Log和Log将返回不同的值。在单元格中插入工作表函数若要在单元格中插入工作表函数，请指定函数作为相应的Range对象的Formula属性值。以下示例中，将RAND工作表函数（可生成随机数）赋给了活动工作簿中Sheet1上A1:B3单元格区域的Formula属性。SubInsertFormula()   Worksheets("Sheet1").Rang

5、e("A1:B3").Formula="=RAND()"EndSub