我正在使用VBS在outlook中创建签名以推送给我们的用户。签名中有表格,因此我可以将徽标/用户信息与徽标顶部的标准文本并排放置。 (原始表格代码见http://www.vbforums.com/showthread.php?526706-resolved-question-with-tables-in-vbscript-for-AD-signature)
下面是写入doc文件的代码片段。代码成功地创建了两个coluns并将我想要的任何信息放入其中。问题是,如果我在table1和table2的顶部输入一条水平线,则两个表之间存在间隙。我的问题是,你能用vbs控制文档的两个表之间的差距吗?
objDoc.Tables.Add objRange, 1, 2
Set objTable = objDoc.Tables(1)
'** Logo column **
'Draw a horizontal line (This only draws it for this frame)
objSelection.InlineShapes.AddHorizontalLineStandard
objTable.Cell(1, 1).select
'Put Logo information here
'** User column **
'Draw a horizontal line (This only draws it for this frame)
objSelection.InlineShapes.AddHorizontalLineStandard
objTable.Cell(1, 2).select
'Put User information here
objSelection.EndKey 6 'Command to end the above tables
答案 0 :(得分:0)
这段代码实际上是VBA,其中的诀窍就是在单词中记录一个宏,它可以帮助您解决这个问题,消除差距。因此,手动创建表格,找出消除差距的最佳方法,然后记录此操作。然后在结果宏中查找已使用的vba代码并将其插入到脚本中。如果有效,请在此处发布您的解决方案。 成功。
答案 1 :(得分:0)
手动创建word文档时,我永远无法触及线条。但是,我实际上通过完全避免上述问题来回答我自己的问题。我在桌子上方添加了一条线。