获取自定义单元格格式表示法作为文本

Question

我有一个包含数量的列。除了这些数量外，还有一个度量单位，例如KG或L.但是，这不是硬复制文本，而是一些自定义格式规则，例如＃。## 0“L”。我想要的是将这些UOM作为文本提取到他们自己的单独列中。有什么方法可以访问这些格式规则来执行此操作，还是有其他方法可以让我得到我想要的内容？

我的完整性解决方案。

Function getcellformat(ByRef valuecell As Range) As String

    getcellformat = Replace(Split(valuecell.NumberFormat, " ")(1), Chr(34), "")

End Function

感谢teylyn指出.NumberFormat

Answer 1

您可以使用.NumberFormat属性显示应用于特定单元格的数字格式

这是“立即窗口”中当前工作表单元格A1的数字格式的屏幕截图