excel - 関数内のセル範囲に色を付けることはできません

Question

関数にパラメーターとして渡されるセルに色を付けようとしていますが、機能していないようです。コードは次のとおりです。

Sub my_test(Target As Range)

    With Target.Cells(1, 1).Interior
        .ColorIndex = 3
        .PatternColorIndex = xlAutomatic
    End With

End Sub


Function f_Lookup_domain(P_Cell_name As Range, ByVal P_Default As String) As String

    Call my_test(P_Cell_name)
    v_Cell_name = P_Cell_name.Value

    ' Application.Volatile
    'Lookup the domain of a signal from the cell name
    '
    v_temp = Application.VLookup(v_Cell_name, Range("n_IO_cell_lookup"), 2, False)
    If Application.IsError(v_temp) Then
        ' cell given is not a real IO cell, try to use default
        If P_Default = "CUT" Then
            v_temp = "Unknown"
        Else
            v_temp = P_Default
        End If
    End If
    f_Lookup_domain = v_temp

End Function

エラー報告はなく、関数は正しい値を返します。my_testが呼び出されますが、セルは描画されません。my_test次のテストベンチで呼び出した場合:

Sub Testbench()

    Call my_test(Range("D10"))

End Sub

セルを正しく色付けします。P_Cell_name範囲のように振る舞っていないかのようですか？アイデアはありますか？