1. Write a Public Function named “FunctionValues”, which takes values of vector x from the specified cells (array) and calculate the function f(x) = x^2 + 1/2x + 2 for all values (array). The function should have one parameter (type array) and will return one array with the same dimension as parameter. Provide some example of using such a function in the worksheet. Please note that it should be programmed as a function and not subroutine!!!


Dim Row As IntegerDim Column As Integer
MyArray = Range("A1:C3")
Row = InputBox(Prompt:="Row")
Column = InputBox(Prompt:="Column")
If Row < 3 And Column < 3 Then
        MsgBox "Item on row " & Row & " and column " & Column & " is " & MyArray(Row, Column)
    Else
        MsgBox "There is no such item"
    End If
End Sub


    Public Function Polyn(Rin As Range) As Double
   Dim v As Variant
   v = Rin.Value
   Polyn = x ^ 2 + 1 / 2 * x + 2
End Function