ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:=2,
AutoFitBehavior:=False


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Mo" wrote in message
...
Hi there,

what is the MacroName for the function, found in the toolbar, to insert a
table by dragging the mouse and selecting desired number of rows and
columns?
I need to override the checkbox .AllowAutoFit = True when a new table is
created that way.
By overriding the Macro TableInsertTable in the desired template I can set
.AllowAutoFit = False which is the desired behaviour. It looks like this:
Sub TableInsertTable ()
With Dialogs(wdDialogTableInsertTable)
If .Show = -1 Then
Selection.Tables(1).AllowAutoFit = False
End If
End With
End Sub

TIA,
Peeter