将字节转换为kB和MB,等待vba中的单元数据

简单的问题:可以说我有2个单元格(A1和A2)。 在A1上,我有一个16000000的值,单元格A2的值为230000.两个值均以字节为单位。 我需要的是能够将它们分别转换为MB和KB与VBA代码。

我可以开始划分A1 / 1024/1024和A2 / 1024,但我想知道的是如何使vba代码diferentiate 2值之间,然后将其转换为各自的类别。 我可以将它们都转换为MB除以1024,但这将使我的单元格A2值为0.23MB。 我不是要求为我写的代码,只是为了解释如何尽可能做到这一点。

如果你可以使用10 3而不是2 10(又名1,024 )和10 *(又名1,000,000 )作为Mb而不是2 2(又名1,048,576 ),那么自定义数字格式代码将在显示时保留原始基础值单位的大小。

 range("B2:B99").NumberFormat = "[Color10][>999999]0,, \M\b;[Color13][>999]0, K\b;[Color3]0 \B;" 

我也添加了蓝色的Mb,绿色的Kb和红色的B.

MB_KB_B