excel - 如何在 VBA 的十六进制范围内保留所有前导零？

Question

我正在尝试扩展一系列十六进制数字。例如，我在 K ... 1880 列和 L ...188A 列上有我的范围是 1880-188A 当我扩展范围时，从 M 列开始，我得到 1880 1881 1882 1883 1884 1885 1886 等。

从我复制并更改了 VBA 脚本以适合我的情况的一篇帖子中......它可以工作......但发现了 2 个问题。我所有的设备范围都是 4 位数字，我需要保留所有前导零。
例如，如果我的范围是 0000 - 0005 .... 它错误... 将不起作用。
如果我的范围是 0001 - 0005 那么我得到 1 2 3 4 5.... 我想成为 0001 0002 0003 0004 0005

任何帮助都感激不尽..
谢谢，杰卡姆
这是我使用它的脚本......只要我的范围内没有前导零

Sub FillHexNumbers()
Dim cellKValue As Long
Dim cellLValue As Long
Dim diffBetweenKAndL As Long
Dim iCtr As Long

cellKValue = CLng(Format("&h" & Cells(2, 11).Text, "###"))
cellLValue = CLng(Format("&h" & Cells(2, 12).Text, "###"))

diffBetweenKAndL = cellLValue - cellKValue

For iCtr = 0 To diffBetweenKAndL
    Cells(2, 13 + iCtr).Value = Hex(cellKValue + iCtr)
Next
End Sub

Answer 1

分析工具包 包含在 DEC 和 HEX 之间转换的函数 - 对于 HEX，您可以指定位数，例如=DEC2HEX(14,4) 给出“000E”。您可以通过“工具/加载项...”启用此软件包。通过添加包含 DEC 数字的列并显示 HEX 等效项，您可能完全不用 VBA 就可以解决您的任务......

希望有帮助