構文
Hex(Number)
Number・・・・ 16進数に変換したい数値(10進数)
戻り値・・・・・文字列型のVariant
戻り値・・・・・文字列型のVariant
10進数を16進数に変換する関数です。
Hex関数のサンプルコード
Public Sub sample_hex_10_16() '■通常の使い方(10進数→16進数) Debug.Print Hex(1) '1 Debug.Print Hex(10) 'A Debug.Print Hex(15) 'F Debug.Print Hex(16) '10 Debug.Print Hex(17) '11 Debug.Print Hex(31) '1F Debug.Print Hex(32) '20 '■16進数の桁数を合わせる(10進数→16進数) Debug.Print Right("0000" & Hex(31), 4) '001F '■16進数を他の関数に渡す場合(10進数→16進数) Debug.Print "& H" & Right("0000" & Hex(31), 4) '&H001F '■16進数を10進数に戻す Debug.Print CLng("&H001F") '31 '■各種エラー 'Debug.Print Hex() '引数は省略できません 'Debug.Print Hex("A") '実行時エラー13 型が一致しません End Sub
その他
- 桁数を揃えるのは下記記事を参考にしてください。
0埋めして桁数を揃える(Format関数/Right関数)
関連記事
【VBA一覧】ColorIndex(文字色/背景色/見出し色)
カラーも16進数で表記する場合もありますね。
コメント