Excel でモジュールを逆にして 10 進数から 16 進数に変換するにはどうすればよいでしょうか?

Excel でモジュールを逆にして 10 進数から 16 進数に変換するにはどうすればよいでしょうか?

この質問は、次のモジュールに基づいています:Excel で 16 進数を 10 進数に変換するにはどうすればいいですか?

私が使用しているモジュール(上記リンクから)は次のとおりです。

Option Explicit

Public Function HexadecimalToDecimal(HexValue As String) As Double

    ' If hex starts with 0x, replace it with &H to represent Hex that VBA will understand
    Dim ModifiedHexValue As String
    ModifiedHexValue = Replace(HexValue, "0x", "&H")

    HexadecimalToDecimal = CDec(ModifiedHexValue)

End Function

私はこうしています:

HexadecimalToDecimal(00007FF7BE6B0000)

これは正しい結果を与える

「140702028333056」

上記のモジュールを逆にして、10 進数を 16 進数に戻す方法についてサポートをお願いします。

10進数から16進数へ10進数(140702028333056)

結果は次のようになります:

「00007FF7BE6B0000」(または明らかに「7FF7BE6B0000」)

どのようなご助力やご指導もいただければ幸いです。

答え1

使用Hex()

Function myDec2Hex(val As Double) As String
    myDec2Hex = Hex(val)
End Function

ここに画像の説明を入力してください

関連情報