Excel VBAでバイト順序を入れ替える方法

バイト配列を使用する方法:Sub SwapByteOrder() Dim data() As Byte Dim temp As Byte Dim i As Long ' 入れ替えるデータをバイト配列に格納する data = Range("A1").Value ' バイト配列の要素を入れ替える For i = LBound(data) To UBound(data) Step 2 temp = data(i) data(i) = data(i + 1) data(i + 1) = temp>>More