Tab insert macro (previous), and basic macro editing
Posted: 2014-03-24 04:23:09
You gave me exactly what I asked for (the macro below).
However, I’m now trying borders around the table cells (varying between and 4 and 5 pt).
The vertical borders don’t show up. (I’ve tried manually narrowing the table by dragging a corner, but have difficulty getting it to ‘lock.’)
1. How do I edit the macro to reduce the table width, or alternatively
2. Can you provide me with another macro about 2/16 - 3/16 narrower, or
3. Is there a way to place a border inside a table cell, instead of outside?
Continuing thanks,
— Susan
# Macro make Smead Easy Slide hanging file folder tab inserts
$doc = Document.active
Insert Table 20, 1
$tbl = $doc.tableSelection.table
# Each sheet has ten tabs, 3.25 wide and 0.875 in height (3 1/4 x 7/8),
# with each tab allotting 0.562 (9/16) for text.
# [The bottom portion of each measures 0.312 (5/16), and folds.]
$tbl.setUserWidthAtColumn 0, 279
$i = 0
while $i < 20
$tbl.setUserHeightAtRow $i, 40.5
$i += 1
$tbl.setUserHeightAtRow $i, 22.5
$i += 1
end
However, I’m now trying borders around the table cells (varying between and 4 and 5 pt).
The vertical borders don’t show up. (I’ve tried manually narrowing the table by dragging a corner, but have difficulty getting it to ‘lock.’)
1. How do I edit the macro to reduce the table width, or alternatively
2. Can you provide me with another macro about 2/16 - 3/16 narrower, or
3. Is there a way to place a border inside a table cell, instead of outside?
Continuing thanks,
— Susan
# Macro make Smead Easy Slide hanging file folder tab inserts
$doc = Document.active
Insert Table 20, 1
$tbl = $doc.tableSelection.table
# Each sheet has ten tabs, 3.25 wide and 0.875 in height (3 1/4 x 7/8),
# with each tab allotting 0.562 (9/16) for text.
# [The bottom portion of each measures 0.312 (5/16), and folds.]
$tbl.setUserWidthAtColumn 0, 279
$i = 0
while $i < 20
$tbl.setUserHeightAtRow $i, 40.5
$i += 1
$tbl.setUserHeightAtRow $i, 22.5
$i += 1
end