Word

Question

我在Word中有一张桌子。我想要做的是将突出显示的行中的数字相加（仅在一列中）。我在互联网上找到the way to sum the content of the cells if they have specific background color，然后使用this thread我更改了功能，以便检查高亮颜色，而不是背景。这就是我创造的：

Function ColorIndex(Rng As Range)
  ColorIndex = Rng.Interior.ColorIndex
End Function

但是，当我想检查它是否在Excel中工作时，我意识到在Excel中没有＆＃39; higlight the text＆＃39;选择权。它让我意识到可能功能不会做我想要的任何事情，我检查并按照我的预期，它会返回单元格背景的颜色。因此，我想看看该函数是否可以在Word中运行，但显然你只能使用Word中的一些预编程函数，而我无法使用Insert - ＆gt;选择我在VBA中创建的函数。模块。这就是为什么我有两个问题：

1）是否可以在Word表中使用由VBA创建的函数，如果可以，该怎么做？
2）有没有办法让函数检查文本是否突出显示？

Answer 1

1. 您可以在Word文档和表格中使用VBA代码但是与表格/单元格一起使用的VBA与Excel代码不同。不同的应用，不同的对象模型。

2. 当然可以。 Range.HighlightColorIndex返回应用于Range的高亮颜色（WdColorIndex，作为整数）。没有高亮显示是wdNoHighlight，整数值= 0.