Нахождение медианы несортированного массива

Код выше

strInfoCell = "'" & strPath & "[" & strFile & "]Sheet1'!R3C3"

myvalue = ExecuteExcel4Macro(strInfoCell)

Должен прочитать

strInfoCell = "'" & strPath & "[" & strFile & "]" & "Sheet1'!R3C3"

myvalue = ExecuteExcel4Macro(strInfoCell)

Отсутствует «& amp;»

Нет необходимости в функции

Приветствия Нила