Différences

Ci-dessous, les différences entre deux révisions de la page.

--- it:logiciels:excel:vba:hextodec [2024/04/24 15:14] – antony
+++ it:logiciels:excel:vba:hextodec [2024/10/31 09:52] (Version actuelle) – supprimée antony
@@ Ligne 1: / Ligne 1: @@
-====== Convertir un chiffre hexadécimal en décimal ======
-<code vba>
-Function myhex2dec(h As String) As String
-   Dim wf As Variant
-   Set wf = WorksheetFunction
-   myhex2dec = Format(CDec(wf.Hex2Dec(Left(h, 7))) * 2 ^ 28 + wf.Hex2Dec(Right(h, 7)), "0")
-End Function
-</code>
-**Source :** https://www.mrexcel.com/board/threads/converting-a-hexadecimal-with-a-length-of-14-to-hexadecimal.1113336/