计算 Excel 单元格中的前导空格

Question

我想标题已经很清楚了。我尝试了以下解决方案，但没有成功。
我的函数适用于 Strings，但不适用于 cells。
非常欢迎任何线索。

Function nbLeadingSpaces(str As Variant) As Integer
    Dim trimmed As String
    trimmed = LTrim(str)
    'works with strings, not with cells
    nbLeadingSpaces = InStr(1, str, Left(trimmed, 1), vbTextCompare) - 1
    'same issue
    'nbLeadingSpaces = Len(str) - Len(LTrim(str))
End Function

我需要这个来做一些基于文本大纲的事情，如果一行是主行，前导空格的数量将显示 或 子行 （多个级别）。 VBA 似乎自动 TRIM 单元格内容 8-/

---

编辑

对不起大家，我很愚蠢（至少有时是这样）。这些单元格前面没有 空格 ，但是 缩进 :-)
那么问题就解决了，我可以得到 rng.IndentLevel 就这样。
不管怎样，你所有的评论都帮助我重新分析了这个问题，我会留下这个问题，这可能有一天会帮助另一个失去理智的人:-)

Answer 1

对不起大家，我很笨（至少有时是这样）。这些单元格前面没有 空格 ，但是 缩进 :-)
然后问题就解决了，我可以得到 rng.IndentLevel 就是这样。