Hi Paul,
This VBA Macro is absolutely smashing! I have been able to hide many columns that were causing me a lot of stress. Out of sight out of mind.
On a side note I hate to have to bother you again - but
rather than open another thread as is etiquette, I hope you don't mind to look at my newbie code.
There are a set of documents that don't need the columns hidden - as they have less data.
I simply need to change the
font size of some columns in each table.
May be Columns 1 and 3.
This is what I have:
Code:
Sub ChangeColumFontSize()
'Change the Font Size in Selected columns in all tables
Dim aTable As Table, aCell As Cell
Dim acolumn As Column
For Each aTable In ActiveDocument.Tables
For Each aCell In aTable.Range.Column(1)
aCell.Range.Font.Size = 14
For Each Cell In aTable.Range.Column(3)
aCell.Range.Font.Size = 14
Next aCell 'or Column
Next aTable
End Sub
its not working
If I can solve this last problem - it would make my week!
thank you
J