VBAで16進数から10進数へ変換する

ar = Array ( "FFf" , "0" , "1" , "2" , "3" , "4" , "5" , "6" , "7" , "8" , "9" , "A" , "B" , "C" , "D" , "E" , "F" , "10" , "11" , "12" , "13" , "14" , "15" , "16" , "17" , "18" , "19" , "1A" , "1B" , "1C" , "1D" , "1E" , "1F" , "20" , "21" , "22" , "23" , "24" , "25" )

For i = 0 To UBound ( ar )

Call HexToDec ( a , b )

Debug . Print a & " " & b

実行結果 FFf 4095 0 0 1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 A 10 B 11 C 12 D 13 E 14 F 15 10 16 11 17 12 18 13 19 14 20 15 21 16 22 17 23 18 24 19 25 1A 26 1B 27 1C 28 1D 29 1E 30 1F 31 20 32 21 33 22 34 23 35 24 36 25 37

関連記事カテゴリー最近の投稿

Win11でNAS上のExcelを開くと保護ビューになる原因と対処方法
VBAからMySQLの接続や操作をする方法(VBAのみで接続可)
VBAでブックやシートを一括でPDF出力する方法
VBAのWorkbook_Openイベントを実行せずにブックを開く方法
VBAでZIPファイルの中身を確認・一覧表示する方法

📎📎📎📎📎📎📎📎📎📎