R
Richard
In Word 2003 is there a way to create a button on a form that would add
another line to a table for additional entries?
another line to a table for additional entries?
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
G
Graham Mayor
There are two methods shown at http://www.gmayor.com/word_vba_examples.htm.
They insert an extra row on exit from the last field in the table, but could
be easily modified to run from a button if preferred.
See also http://www.gmayor.com/SelectFile.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
They insert an extra row on exit from the last field in the table, but could
be easily modified to run from a button if preferred.
See also http://www.gmayor.com/SelectFile.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
R
Richard
The second option works great, however, the document that I want to attach
this macro to contains 9 separate tables and this macro inserts the new row
on only the first table. Is there a way for me to assign this macro to
specific tables in the document? In particular I need it to run on two
different tables in the document.
this macro to contains 9 separate tables and this macro inserts the new row
on only the first table. Is there a way for me to assign this macro to
specific tables in the document? In particular I need it to run on two
different tables in the document.
G
Graham Mayor
If by the second option, you mean the second option from the first linke
then the tables are addressed by number i.e.
Set oTable = .Tables(1)
will access Table1
Set oTable = .Tables(2)
will access Table 2 etc
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
then the tables are addressed by number i.e.
Set oTable = .Tables(1)
will access Table1
Set oTable = .Tables(2)
will access Table 2 etc
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
R
Richard
That did the trick. Thanks. I am, however, getting a Runtime error 4248
when I run it.
when I run it.
G
Graham Mayor
What changes *exactly* have you made to the posted code? Which line is
flagged as in error?
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
flagged as in error?
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>