Огромное спасибо!  Работает. Не думал то все так сложно.

Уже 4-ый день рою интернет и ничего не могу найти. Есть аналогичные решения для Unicode формата,  а для UTF-8 не нашел. (((

Есть одномерный массив содержащий  символы HEX кодов символов в кодировке  UTF-8  (русские буквы 2-байта).

Например:  Дано:   Array("D0", "A2" , "D0" ,"B5" , "D1" , "81", "D1" , "82")  
Надо преобразовать в строку:  "Тест"

для кодировки Unicode есть решение подобной задачи:
 Дано:   Array("04", "22" , "04" ,"35" , "04" , "41", "04" , "42")  
Надо преобразовать в строку:  "Тест"    
используется:  ChrW(CDec(WorksheetFunction.Hex2Dec("0422")))

Возможно задача банальная, и просто гдето ошибся в понимании решения, но пока не получается.

Если использовать   комбинацию функций  ChrW(CDec(WorksheetFunction.Hex2Dec("D0A2"))), то  дает знак вопроса а не букву "Т"
Возможно как вариант преобразовывать код из Unicode в UTF-8 ....и потом использовать, но чем преобразовывать?

Помогите пожалуйста побороть .....