Word VBA: Resize Table Width???

tinfanide · #1 04-21-2012, 02:32 AM

ResizeTableWidth.zip

Please see the attachment (the VBA codes inside)

I want to resize the second table width.
The problem is:
there seems to be no Tables(index).Width in Word VBA
I know there is PreferredWidth

But I want to resize the last column width only.

I have already written the codes to do so in the attached file.
But I wonder if there is a simpler way to do so in VBA.
Please take a look if you are interested.

macropod · #2 04-21-2012, 04:30 AM

Hi tinfanide,

There is no attachment to your post - just an invlaid link. However, try something along the lines of:

Code:

Sub Demo()
With ActiveDocument.Tables(2)
  .Columns(.Columns.Count).Width = CentimetersToPoints(2#)
End With
End Sub

tinfanide · #3 04-21-2012, 07:39 AM

The link is not working?
Anyway, just came up with a similar solution like yours.
Thanks.

macropod · #4 04-21-2012, 01:41 PM

Hi tinfanide,

Quote:

The link is not working?

The file it points to isn't a valid zip archive.

tinfanide · #5 04-21-2012, 02:42 PM

Quote:

Originally Posted by macropod

Hi tinfanide,

The file it points to isn't a valid zip archive.

Yeah... I don't know why. I did download it and open it on my machine. But when I tried that again at my friend's home, it said it was broken.

macropod · #6 04-21-2012, 03:00 PM

For future reference, you might do better attaching files via the paperclip symbol on this forum's 'Go Advanced' tab.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to make the Caption and its text have the same width as the table?	Jamal NUMAN	Word	1	04-24-2011 06:44 PM
Table of Contents width	Jonart	Word	2	03-31-2011 10:51 PM
Control cell width and wrapping in table.	gcowan	Word Tables	0	07-07-2010 11:28 AM
Resize-to-fit Table Columns (PowerPoint)	icu222much	PowerPoint	0	06-06-2010 11:21 AM