Insert a single table cell and set it to the height and width required for a
single letter. An exact height and width of .6 cm works well.
Add extra columns - which will be of the same size - for the required number
of letters. I would recommend saving the single cell as an autotext entry
for ease of repetition. The macro below will add columns as required. (see
http://www.gmayor.com/installing_macro.htm)
Sub AddColumns()
Dim sColumn As String
Restart:
sColumn = InputBox("How many letters?", "Letters", 2)
If sColumn = "" Then
End
ElseIf sColumn > 25 Then
MsgBox "Too many columns! Maximum 25."
GoTo Restart
End If
On Error GoTo Oops
For X = 1 To (sColumn - 1)
Selection.InsertColumnsRight
Next
Oops:
End Sub
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>