VBA缩进“特殊悬挂”方法...项目符号点和文本之间的间距

Question

基本上，我试图找到与以下内容相对应的VBA方法，因为它似乎可以控制项目符号点与其相应文本（）之间的距离：

在“对象浏览器”中查找“挂起”这些内容，但似乎并没有执行我的要求：

TabHangingIndent仅将一个整数作为参数，该整数是项目符号点后的缩进量，而不是默认TabHangingIndent(0)时的实际距离。

HangingPunctuation ...不确定该做的是什么，但这是我在文档中所知道的。寻找可能需要InchesToPoints(x)的东西。

关于正确使用的类和方法有什么建议吗？

Answer 1

最后只是记录宏以查看正在更改的内容。不是最直观的事情：

With .Cell(r, c)
    .Range.Shading.BackgroundPatternColor = RGB(255, 255, 153)
    .Range.ListFormat.ApplyBulletDefault
    .Range.ParagraphFormat.FirstLineIndent = InchesToPoints(-0.1) 'was this line here
    .Range.ParagraphFormat.LeftIndent = InchesToPoints(0.1)
End With