海口电脑维修网

1、VBA 自定义函数

Option Explicit

Function f1(x As Integer)    'x 在这里接收到的是 A1 单元格的值，而不是 A1 地址
'
' Macro1 Macro
' 在 VBA 中定义一个自定义函数，在 Excel 单元格中引用
'

'
    If x Mod 2 = 0 Then
        f1= "偶数"    '通过函数名返回值
    Else
        f1= "奇数"
    End If
End Function

2、Excel 单元格中的引用

=f1(A1)

本文来自: 长沙电脑维修网(www.0731wx.com) 详细出处参考：http://www.0731wx.com/article/1823.html