要自动选中Word中红色字体的部分，您可以使用VBA宏来实现。以下是一个示例代码，可以实现选中红色字体的部分，并将其复制到剪贴板中：
1. 打开Word，按下`Alt + F11`进入VBA编辑器；
2. 在左侧的项目窗口中，双击打开`ThisDocument`；
3. 在右侧的代码窗口中，复制以下代码并粘贴：
```VBA
Sub SelectRedFont()
Dim i As Long
Dim lStart As Long
Dim lEnd As Long
Dim oRange As Range
'获取当前文档的范围
Set oRange = ActiveDocument.Content
lStart = oRange.Start
With oRange.Find
.ClearFormatting
.Font.Color = wdColorRed '设定查找的字体颜色为红色
.Forward = True
.Wrap = wdFindStop
.Execute
'找到后的操作
While .Found = True
'如果找到连续红色字体超过100个字，则选中该范围
If oRange.End - lStart > 100 Then
oRange.Select
Exit Sub
End If
'继续向后查找
lStart = oRange.End
.Execute
Wend
End With
MsgBox "未找到符合条件的红色字体段落！"
End Sub
```
4. 按下`F5`运行宏；
5. 如果文档中存在连续100个以上的红色字体，该部分将被自动选中并复制到剪贴板中。如果没有找到符合条件的红色字体段落，将会弹出一个消息框提示。
请注意，如果文档中没有红色字体段落满足要求，或是使用其他颜色或版本的Word可能需要略作修改代码。
word2010把文档中的红色字体全部选中，可通过查找字体格式实现。方法步骤如下：
1、打开需要操作的WORD文档，在开始选项卡中找到并点击“查找”后面的下拉按钮，并选择“高级查找”。
2、点击格式，选择“字体”。
3、在字体颜色下方选项框中，点击选择“红色”，然后点击确定按钮。
4、在查找内容输入框中输入“*”,勾选“使用通配符”，然后“在以下项中查找”选择“主文档”即可。
5、返回主文档，发现所有红色字体文本都已经处于选中状态。
