Apply a macro to a specified Cell
Dear Abel,
An example:
Sub Test()
Dim oTable As Table
Set oTable = ActiveDocument.Tables(1) 'first table in document
With oTable.Cell(2, 1).Range
.Text = "Bobs your uncle"
.Font.Color = wdColorBlue
.Borders.OutsideLineStyle = wdLineStyleDouble
End With
End Sub
|