So ist der Wertebereich von 0 bis 10000. Und wie gehts jetzt weiter?
Da reichen dann also sogar 2 Bytes für die Übertragung aus.
Fürs Übertragen gibt es verschiedene Möglichkeiten, z.B.:
Dim Db1 As Byte
Dim Db2 As Byte
Dim Messwert As Integer At Db1 Overlay
Messwert = 10000
'Sende Db1
'Sende Db2

Gruß Dirk