Я новичок в Excel VBA.

Как изменить значение указанной ячейки через пользовательскую функцию? Что не так с этим кодом:

Function Test(ByVal ACell As Range) As String
  ACell.Value = "This text is set by a function"
  Test := "Result"
End Function

Мое желание ... когда я печатаю=Test(E6) в ячейке E1 Excel отобразит указанный текст в E6.