VBA + HEX + MSCOMM32 + RS-232 : Операционные системы и программное обеспечение

Имеем весы на базе ВП Тензо-м ТВ003/05Н. Есть протокол обменаданными. Протокол понятен. Для работы с RS-232 использую модуль MSCOMM32. Но никак не получается через макрос отправить на интерфейс весов команду в hex-формате. Подскажите, а, как это сделать? Пожалуйста.

а вариант типа
mscomm.output= Chr$(&H5) не катит ?
если так, то можно попробовать

Dim byteArray(3) As Byte, i As Integer

Private Sub send()
byteArray(0) = &H51
byteArray(1) = &H52
byteArray(2) = &H50
For i = 0 To 2
mscomm.SendData byteArray(i)
Next
End Sub

Попробую завтра, по-моему, первый вариант синтаксиса не прокатил, с sendData не пробовал.

Спасибо! Дело было в том, что я неправильно писал функцию

Для общения с весами из под недо-осей для себя навоял на .Net COM сервер, который выполняет функцию абстракции от типа опрашиваемых весов, предоставляя приложению COM объект для работы с различными типами весов включая Bizerba, Тензо-M, CAS. COM портовые весы могут быть подключены как напрямую через COM порт так и через адаптер типа COM<->Ethernet.

Разработка делалась для внутреннего использования потому может показаться нетривиальной в установке и настройке. За сим в свободный доступ не выкладываю, кому интересно, обращайтесь. Готов делиться безвозмездно, для постоянных участников форума.

Мне интересно