vba range（「A1」）。value給出了#Value！當輸入函數

Question

我希望它從Excel電子表格中調用的VBA函數返回多個值，但總是得到錯誤#Value！在網絡上找到

一個例子：

Sub ReturnCellValue() 
    Worksheets("Sheet1").Range("A1").Value = 3.14159 
End Function 

這個函數返回＃VALUE！

Function ReturnCellValue() 
    Worksheets("Sheet1").Range("A1").Value = 3.14159 
End Function 

這一行代碼在立即的winnow中工作。

Worksheets("Sheet1").Range("A1").Value = 3.14159 

我發現的所有例子都是子類。你如何從一個函數調用一個子？

Answer 1

此功能：

Function ReturnCellValue() 
    Worksheets("Sheet1").Range("A1").Value = 3.14159 
End Function 

• 不返回單元格的值，而是設置一個單元格的值（和VBA的=運營商形成了一個聲明，而不是一個表達式，所以你不能嵌套分配）。
• 不返回任何值，因爲您沒有返回值（通過分配函數名稱返回VBA函數中的值）。

你可能想這樣的：

Function ReturnCellValue() As Variant 
    ReturnCellValue = Worksheets("Sheet1").Range("A1").Value 
End Function