设置使用VBA

我使用VBA创建从Excel电子表格填充的Lotus邮件Lotus Notes的部分边界，我被困在一个非常愚蠢的问题。

当我在笔记中创建新的部分时，业务规则要求我给它一个边框。他们多年来一直在手动执行此操作，并习惯从Notes UI执行此操作。他们创建一个新的部分，然后转到其属性，然后将其更改为具有边框（请参阅此screenshot中属性窗口中的边框和样式部分）。

我不知道如何通过VBA添加此边框。有任何想法吗？我试过改变TitleStyle，但只影响字体和颜色。我做了所有事情，只是停留在边界上！

谢谢！

Mike

来源

2011-05-10 user747267

您可以使用Borders（）属性设置要复制的单元格的边框。

例子：

Range("B2:C4").Borders.LineStyle = xlDash 
Range("B2:C4").Borders(xlEdgeBottom) = RGB(255,0,0)

来源

2011-05-10 17:22:19

你需要仔细阅读这个问题:) – 2011-05-10 18:53:43

@Ken，我想你需要更仔细地阅读我的答案。他可以在复制Excel范围之前设置边框，并且可以复制边框（需要测试以查看边框是否导入）。 – 2011-05-10 19:10:07

@兰斯，请原谅我，如果我听起来粗鲁。但是你错过了他的问题。他正在讨论在Lotus Notes中向某个部分添加边框，这与Excel文档或单元格区域中的边框无关。看他附上的截图。我认为问题标题和标签可能不应该引用Excel。这实际上只是一个Lotus Notes问题。 – 2011-05-10 19:52:33

的NotesRichTextSection类不给你任何方式更改边框，很遗憾。 Lotus Notes中的富文本项目通过API不太受支持，因此经常会发现在客户端上可以执行的操作与在代码中执行的操作之间不匹配。

如果您想尝试它，可能会有解决方法。首先，您需要在Notes中创建一个具有丰富文本字段的简单表单，让我们将其称为Body，并由一个节包围。您可以根据需要设置部分，并设置边框等。您还需要另一个名为Title的隐藏文本字段，并根据该Title字段设置要计算的部分标题。

然后在您的VBA代码中，您将基于该表单创建一个新的NotesDocument。您将设置标题字段，然后您将内容添加到正文丰富文本项目中。然后，您需要调用ComputeWithForm方法，然后调用Save方法。最后，您可以使用文档上的RenderToRTItem方法将整个文档放入原始笔记的富文本字段中。合理？

没有保证可以在VBA中工作，但我在过去使用LotusScript完成了类似的事情，它的确有诀窍。

来源

2011-05-10 19:06:37

回答

相关问题