Improve company productivity with a Business Account.Sign Up

x
?
Solved

Table Automation in MS Word

Posted on 2007-11-28
1
Medium Priority
?
891 Views
Last Modified: 2008-02-01
Using an existing word document which is opened via Visual Basic in MS Access, how do I add or delete rows to an existing table. The existing table contains 5 rows and two columns.  The number of columns will not change just the number of rows
0
Comment
Question by:marcdtucker
1 Comment
 
LVL 77

Accepted Solution

by:
GrahamSkan earned 375 total points
ID: 20368002
Dim wdTable as Word.Table
Dim wdDoc as Word.Document
Dim wdRow as Word.Row

Set wdTable = wdDoc.Tables(1)

'To add a Row
set WdRow = wdTable.Rows.Add


'To delete a row
wdTable.Rows(3).Delete
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Using Word 2013, I was experiencing some incredible lag when typing.  Here's what worked for me....
Microsoft's Excel has many features that most people will never need nor take advantage of.  Conditional formatting is one feature that you may find a necessity once you start using it.
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…

606 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question