Setting Decimal Tabs in a Table Using the Keyboard

If you love using the keyboard, you may wonder if there is a way to set decimal tabs in a table using the keyboard. Unfortunately, there is no simple, fast keystroke to set the decimal tabs. The best way is to use the regular accelerator keys that Word uses. You would follow these steps:

1. If you want to set the tab stop in each cell of the current column, press Alt+A, C (Word 97) or Alt+A, C, T (later versions of Word). This selects the current table in the column.
2. Press Alt+O, T. This displays the Tabs dialog box. (Click here to see a related figure.)
3. Type the measurement for where the tab should appear.
4. Press Alt+D to indicate this is a decimal tab.
5. Press Alt+S to set the tab.
6. Press Enter to dismiss the Tabs dialog box.

If you would rather not go through such an easy-to-remember process (grin), then you can also create a macro that will do the trick, and assign the macro to a shortcut key. The following is an example of a simple VBA macro that would do the job:

Sub SetDecimal()
    Dim MyTab As String

    MyTab = InputBox("Location (inches):", "Set Decimal Tab")
    If Val(MyTab) > 0 Then
        With Selection.ParagraphFormat.TabStops
            .ClearAll
            .Add Position:=InchesToPoints(Val(MyTab)), _
                Alignment:=wdAlignTabDecimal, _
                Leader:=wdTabLeaderSpaces
        End With
    End If
End Sub

This macro, which should be run after the cell or column is selected, clears all the existing tabs in the selection, and then prompts the user to enter a value for the new tab stop.