2012-08-30 3 views
0

Parfois, lorsque je travaille en studio visuel, je me retrouve avec un bloc de code dont j'ai besoin pour indenter un seul espace afin de l'aligner complètement. Un retrait de taille normale serait effectué en sélectionnant le texte et en appuyant sur la touche de tabulation; cependant, si je veux juste le déplacer le long d'un espace, sélectionner le texte et appuyer sur la barre d'espace écrase le code.Retrait d'un seul espace

Je sais que je pouvais le faire en changeant l'option d'espacement onglet donc la taille de tiret est 1, le texte indenter puis changer en arrière, mais cela semble un peu verbeux ...

Je n'ai pas eu chance la recherche, donc j'ai écrit une macro pour faire ce qui précède, mais je pensais que je demande ici avant que je résigné à l'utiliser au cas où la fonction/raccourci existait déjà ...


Modifier : Macro déplacée vers les réponses

+0

Postez ce que vous avez comme réponse. –

+0

bonne idée ... :) – Elliott

Répondre

0

Voici la macro pour quiconque intéressé:

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 
Questions connexes