Apply changes to an individual cell in a table

Article contributed by Bill Coan

Drill down to the desired cell. In this example, Cell(1, 1) refers to the cell in row 1, column 1:

With ActiveDocument.Tables(1).Cell(1, 1)
    .Width = InchesToPoints(1)
    .Shading.BackgroundPatternColorIndex = wdBlue
    .Range.Font.Name = "Arial"
    .Range.Font.Size = 20
End With