S
Simon Kearns
Hi,
What would be the method to do this:
For each aProperty in myDocument.myTable
debug.print aProperty.value
next aProperty
-- In this instance a table but need to apply to any word object.
I want to be able to see a list of all the properties of a table that are
currently set so I have
the chance of setting their values in code. I have tried recording a macro
of mouse clicking the table properties dialog box but the macro only seems
to return the items that I change.
Or, by maybe another method, is it possible to iterate through and return
the current setting of a dialog box (in this instance -- table properties).
Below: example of macro output. Problem is not all property settings are
shown.
Sub Macro1()
'
With Selection.Rows
.Alignment = wdAlignRowLeft
.AllowBreakAcrossPages = True
.SetLeftIndent LeftIndent:=CentimetersToPoints(0.5), RulerStyle:= _
wdAdjustNone
End With
Selection.Cells.AutoFit
End Sub
Thanks
What would be the method to do this:
For each aProperty in myDocument.myTable
debug.print aProperty.value
next aProperty
-- In this instance a table but need to apply to any word object.
I want to be able to see a list of all the properties of a table that are
currently set so I have
the chance of setting their values in code. I have tried recording a macro
of mouse clicking the table properties dialog box but the macro only seems
to return the items that I change.
Or, by maybe another method, is it possible to iterate through and return
the current setting of a dialog box (in this instance -- table properties).
Below: example of macro output. Problem is not all property settings are
shown.
Sub Macro1()
'
With Selection.Rows
.Alignment = wdAlignRowLeft
.AllowBreakAcrossPages = True
.SetLeftIndent LeftIndent:=CentimetersToPoints(0.5), RulerStyle:= _
wdAdjustNone
End With
Selection.Cells.AutoFit
End Sub
Thanks