I know - use COM, not OLE… But I am about 90% done with this, so I will continue with OLE…
I am trying to adjust the size of each column in the table I created in Word use OLE in LotusScript.
I created a Word Macro and copied the code over, trying to convert it in LotusScript.
Here is the code:
Selection.Tables(1).Columns(1).SetWidth ColumnWidth:=149.4, RulerStyle:=wdAdjustNone
Which I attempted to conver to:
Call wordApp.Selection.Tables(1).Columns(z).SetWidth(colWidth(z))
This is used in the loop:
For z = 0 To Ubound(colHeaders)
'This sets the field value into the current cell...
Call wordApp.Selection.TypeText(colHeaders(z))
'Format the cell size????
Call wordApp.Selection.Tables(1).Columns(z).SetWidth(colWidth(z))
'This will move over a cell...
'First parameter is move cell, Second parameter is how many cells to move over...
'12 is the integer conversion for "wdCell" in Visual Basic...
Call wordApp.Selection.MoveRight(12, 1)
Next
I am also trying to position the table I create where the cursor is, not at “0,0”…
I already found this post:
But it does not give me an example I can work with - that is, working with column sizing…
Any help would be great…
Thanks!