单空格缩进

Question

有时当我在visualstudio中工作时，我会得到一块代码，需要缩进一个空格才能使其完全对齐。

正常大小的缩进可以通过选择文本并按tab键来完成，但如果我只想将其沿一个空格移动，则选择文本并按下空格键会覆盖代码。

我知道我可以通过更改制表符间距选项来做到这一点，使缩进大小为1，缩进文本，然后将其改回，但这似乎有点冗长。。。

我在搜索时运气不佳，所以我写了一个宏来完成上面的操作，但在我放弃使用它之前，我想我应该在这里询问一下，以防函数/快捷方式已经存在。。。

---

编辑：宏移动到回答

Answer 1

以下是任何感兴趣的人所说的宏：

Sub SingleSpaceIndent()
    Dim textEditor As Properties
    textEditor = DTE.Properties("TextEditor", "AllLanguages")
    textEditor.Item("IndentSize").Value = 1
    DTE.ActiveDocument.Selection.Indent()
    textEditor.Item("IndentSize").Value = 4
End Sub