Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
Joining two tables
How do you line up columns of two tables with the same number of columns with
one another before joining them. |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
Joining two tables
If you increase the zoom and then hold down the Alt key as you adjust the
columns widths, you should be able to get things to line up. If however, that is too difficult, the following macro will append the data from the second table in a document to the first table in the document Dim source As Table Dim target As Table Dim newRow As Row Dim i As Long, j As Long Dim data As Range With ActiveDocument Set target = .Tables(1) Set source = .Tables(2) End With With source For i = 1 To .Rows.Count Set newRow = target.Rows.Add For j = 1 To .Columns.Count Set data = .Cell(i, j).Range data.End = data.End - 1 newRow.Cells(j).Range.Text = data.Text Next j Next i .Delete End With -- 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 "Kobus Botha" Kobus wrote in message ... How do you line up columns of two tables with the same number of columns with one another before joining them. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Joining together 2 tables in Word | Tables | |||
Joining Tables | Microsoft Word Help | |||
joining tables | Tables | |||
Joining two different tables and making them as one | Tables | |||
Joining tables | Microsoft Word Help |