Vba 用于Outlook的VBScript，设置字体'；将字符间距压缩为

我正在使用VBScript为outlook编写签名脚本。 我对字体进行了设置，下面是我的代码：

objSelection.Font.Name = "Lucida Sans Unicode"
objSelection.Font.Color = RGB (168,153,110)
objSelection.Font.Size = 10
objSelection.Font.CharacterSpacing = "Condensed"
objSelection.TypeText "___________________________________________"

---

除字符间距设置为压缩外的所有作品。字符间距的正确设置是什么？

假设objSelection是一个Word。Selection对象（如果不是），更改间距的正确属性是。但它不接受文字，而是以点为单位的大小