VBA入门到进阶常用知识代码总结06

第6集 函数与公式
16、 VBA中输入数组公式
formula：公式 array：数组
'3、用VBA在单元格中输入数组公式
Sub t4()
Range(“c9”).FormulaArray = “=SUM(B2:B6C2:C6)"
End Sub
17、 VBA公式返回值
Evaluate：数值
'二、利用单元格公式返回值
Sub t5()
Range(“d16”) = Evaluate("=SUMIF(A2:A6,"“b”",B2:B6)")
Range(“d9”) = Evaluate("=SUM(B2:B6C2:C6)”)
End Sub
18、 借用工作表函数
函数用的工作表的函数，采用Application.WorksheetFunction调用，只是公式参数表现形式采用VBA的表现形式。
'三、借用工作表函数
Sub t6()
Range(“d8”) = Application.WorksheetFunction.CountIf(Range(“A1:A10”), “B”)
End Sub
19、 VBA函数
'四、利用VBA函数
Sub t7()
Range(“C20”) = VBA.InStr(Range(“a20”), “E”)
End Sub