Excel VBA:あるセルの内容が空でなければあるセルの内容を、空だったら0を返す自作関数

Excel VBA

サンプルコード

Public Function BlankToZero(ByVal s As String, Optional ByVal result As String = "0") As String

    If Not Len(s) = 0 Then
    
        result = s
    End If
    
    BlankToZero = result
End Function

コメント

タイトルとURLをコピーしました