>>137
最後のConvHex関数さ、
Function ConvHex(DecValue)
   ConvHex=Mid("0123456789ABCDEF",DecValue+1,1)
End Function
でいいんじゃない?エラー処理して無いけど。