Solved

Table Automation in MS Word

Posted on 2007-11-28
1
875 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 76

Accepted Solution

by:
GrahamSkan earned 125 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

Why You Should Analyze Threat Actor TTPs

After years of analyzing threat actor behavior, it’s become clear that at any given time there are specific tactics, techniques, and procedures (TTPs) that are particularly prevalent. By analyzing and understanding these TTPs, you can dramatically enhance your security program.

Join & Write a Comment

The System Center Operations Manager 2012, known as SCOM, is a part of the Microsoft system center product that provides the user with infrastructure monitoring and application performance monitoring. SCOM monitors:   Windows or UNIX/LinuxNetwo…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
This Micro Tutorial well show you how to find and replace special characters in Microsoft Word. This is similar to carriage returns to convert columns of values from Microsoft Excel into comma separated lists.
Office 365 is currently available in five editions. Three of them are for business use: Office 365 Business Essentials, Office 365 Business, and Office 365 Business Premium. Two of them are for home/personal use: Office 365 Home and Office 365 Perso…

760 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

Need Help in Real-Time?

Connect with top rated Experts

23 Experts available now in Live!

Get 1:1 Help Now