- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
使用 Word Interop API 我有一个文档,我从中删除了用特定颜色突出显示的文本。归结起来,逻辑类似这样:
if(range.HighlightColorIndex == WdColorIndex.wdYellow)
{
range.Delete();
}
对于某些文档,我注意到 range.HighlightColorIndex
返回值:999999
。
通过查看 WdColorIndex
枚举(它是 HighlightColorIndex
属性的类型),我看到枚举是通过在从-1
到 16
,这没有解释返回的 999999
数字。
此外,通过使用 Word,我注意到一些奇怪的行为。创建一个包含两条黄色突出显示行的新文档 - 第一行包含文本和超链接,第二行仅包含文本:
打开文档后Word高亮识别截图如下:
从这项研究来看,这似乎是 Word 中的一个错误,但我想确保我没有遗漏任何东西 - 所以,基本上,是否有人知道这是有意为之的行为还是错误,并且此外,在给定情况下使用 Word Interop 时,有什么合理的方法来处理它?</p>
对于这种情况,我运行的是 Office 2010 和 Word Interop API 版本 14。
最佳答案
Word 使用值 999999 表示当前选择包含多个相应格式。
在您的示例中,超链接表示为包含突出显示的运行的 Word 字段(按 Alt-F9 切换代码 View )。重新打开文档后,该字段本身没有应用突出显示。这不一定是 Word 中的错误,只是(超链接)字段的行为不会记住字段级别的格式。
但是,您的实际任务似乎是从文档中删除突出显示的文本。这通常可以使用 Word 的 Range.Find
对象更好地完成:
range.Find.ClearFormatting();
range.Find.ClearAllFuzzyOptions();
range.Find.Highlight = 1;
range.Find.Replacement.ClearFormatting();
range.Find.Replacement.Text = "";
range.Find.Wrap = Word.WdFindWrap.wdFindContinue;
range.Find.Execute(Replace: Word.WdReplace.wdReplaceAll);
这是一个完整的示例程序,您可以使用它来删除突出显示:
using System;
using System.Linq;
using Word = Microsoft.Office.Interop.Word;
class Program
{
static void Main(string[] args)
{
var fileName = args[0];
var wordApp = new Word.Application();
wordApp.Visible = true;
var document = wordApp.Documents.Open(fileName);
RemoveHighlightingEverywhere(document);
}
static void RemoveHighlightingEverywhere(Word.Document document)
{
foreach (Word.Range storyRange in document.StoryRanges)
{
var range = storyRange;
while (range != null)
{
RemoveHighlightingFromRange(range);
if (range.ShapeRange.Count > 0)
{
foreach (Word.Shape shape in range.ShapeRange)
{
if (shape.TextFrame.HasText != 0)
{
RemoveHighlightingFromRange(
shape.TextFrame.TextRange);
}
}
}
range = range.NextStoryRange;
}
}
}
static void RemoveHighlightingFromRange(Word.Range range)
{
range.Find.ClearFormatting();
range.Find.ClearAllFuzzyOptions();
range.Find.Highlight = 1;
range.Find.Replacement.ClearFormatting();
range.Find.Replacement.Text = "";
range.Find.Wrap = Word.WdFindWrap.wdFindContinue;
range.Find.Execute(Replace: Word.WdReplace.wdReplaceAll);
}
}
关于ms-word - C# Word Interop - Range.HighlightColorIndex 返回 999999 - 这是有意的吗?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/13961776/
我创建了以下 sub 来简单地说明问题。我将事件工作表的范围 A2:E10 分配给范围变量。然后,对于另一个范围变量,我将这个范围的子范围,单元格 (1, 1) 分配给 (3, 3)。 我原以为这将包
我使用正则表达式来搜索以下属性返回的纯文本: namespace Microsoft.Office.Interop.Word { public class Range {
我正在开发一个宏来突出显示某些行/单元格以供进一步审查。一些值/空白将以红色突出显示,其他以橙色突出显示,而整行应为黄色。我从上一个问题中得到了一些帮助,并添加了更多细节,它工作得几乎完美,但我被困在
这个问题在这里已经有了答案: What is the difference between range and xrange functions in Python 2.X? (28 个答案) 关闭
我在尝试运行脚本时遇到这个奇怪的错误,代码似乎是正确的,但似乎 python (3) 不喜欢这部分: def function(x): if int
我正在编写一种算法,将一些数据写入提供的输出范围(问题的初始文本包括具体细节,这将评论中的讨论转向了错误的方向)。我希望它在 API 中尽可能接近标准库中的其他范围算法。 我查看了 std::rang
这按预期工作: #include #include int main() { auto chunklist = ranges::views::ints(1, 13) | ranges::vie
我这里有一个字符串,我正在尝试对其进行子字符串化。 let desc = "Hello world. Hello World." var stringRange = 1..' 的值转换为预期的参数类型
我有一个高级搜索功能,可以根据日期和时间查询记录。我想返回日期时间范围内的所有记录,然后从该范围内返回我想将结果缩小到一个小时范围(例如 2012 年 5 月 1 日 - 2012 年 5 月 7 日
Go 中的 range 函数和 range 关键字有什么区别? func main(){ s := []int{10, 20, 30, 40, 50, 60, 70, 80, 90}
如果我有一个范围,如何将其拆分为一系列连续的子范围,其中指定了子范围(存储桶)的数量?如果没有足够的元素,则应省略空桶。 例如: splitRange(1 to 6, 3) == Seq(Range(
我正在开发 VSTO Excel 项目,但在管理 Range 对象时遇到一些问题。 实际上,我需要知道当前选定的范围是否与我存储在列表中的另一个范围重叠。所以基本上,我有 2 个 Range 实例,我
在即将推出的 C++20 系列中,将有 range concept具有以下定义: template concept range = __RangeImpl; // exposition-only de
希望有人能回答我的问题。我在 VHDL 代码中遇到了这个命令,但不确定它到底做了什么。有人可以澄清以下内容吗? if ( element1 = (element1'range => '0')) the
可以将范围嵌套在范围中吗?使用范围内的变量?因为我想取得一些效果。为了说明这个问题,我有以下伪代码: for i in range(str(2**i) for i in range(1,2)):
我想在 2 个日期之间创建一个范围,并且我的范围字段有时间 damage_list = Damage.objects.filter(entry_date__range=(fdate, tdate))
在下面的代码中 #include #include #include int main() { std::unordered_mapm; m["1"]=1; m["2"]=2
我试图为我的电子表格做一个简单的循环,它循环遍历一个范围并检查该行是否为空,如果不是,则循环遍历一系列列并检查它们是否为空,如果是则它设置一个消息。 问题是每次它通过循环 ro.value 和 col
我在将一个工作簿范围中的值分配给当前工作簿中的某个范围时遇到问题。当我使用 Range("A1:C1") 分配我的范围时,此代码工作正常,但是当我使用 Range(Cells(1,1),Cells(1
我改写了原来的问题。 Sub s() Dim r As Range Set r = ActiveSheet.Range("B2:D5") Debug.Print r.Rows.Count
我是一名优秀的程序员,十分优秀!