從自定義VBA函數（不是子函數）寫入Excel工作表

Question

非常感謝您的幫助，可以幫助我將自定義VBA函數的數據寫入excel工作表。 我已經能夠從自定義VBA子例程編寫代碼，但是在執行VBA函數時遇到錯誤。 在示例代碼中，“ Sub write 2”和“ Sub write 3”可以正常工作。 但是“功能測試2（）”會生成“值！” 在其單元格中，未執行write3。

Sub write2(r As Integer, c As Integer, d As Double)
    Dim a, b As Integer
    For a = r To r + 1
        For b = c To c + 1
            Cells(a, b).Value = d
        Next b
    Next a
End Sub

Sub write3()
    Call write2(3, 60, 0.437)
End Sub

Function test2() As Double
    Call write3
    test2 = 1#
End Function

Answer 1

根據Chip Pearson的出色網站 ：

UDF只能將值返回到調用它的單元格-不得修改任何單元格的內容或格式，也不得修改Excel的操作環境。 如果您嘗試更改任何內容，該函數將立即終止，並向調用單元格返回#VALUE錯誤。