☰

提取大写单词或带有数字的单词（Excel）

tag-icon • tag-icon microsoft-excel
提取大写单词或带有数字的单词（Excel）

我有一个包含文章的数据库，我想提取大写单词和带有数字的单词来创建列表。以下是示例：

“我，Duroux-Richard 等人将解释如何流通微小RNA，尤其是miRNA-125b，是潜在的有价值的生物标志物类风湿关节炎在“循环 miRNA-125b 是预测类风湿关节炎对利妥昔单抗反应的潜在生物标志物”中。循环 miRNA-125 水平可能预测类风湿关节炎对利妥昔单抗的反应类风湿关节炎因此，其他团队必须重新评估患者及其利益，以用于日常临床实践。”

我希望输出的是文本中我加粗的所有单词。

答案1

您可以使用正则表达式 \w*[A-Z-0-9]+\w*选择您的文本...看看这里： 在此处输入图片描述

另一个更复杂的替代方法是不计算第一个大写字母，而是只计算大写字母的单词，如下所示：(\b[a-z0-9]\w*[A-Z-0-9]+\w*)|(\b[A-Z]{2,}\b)，这里： 在此处输入图片描述

答案2

这种方法假设字就像用“空格”分隔的文本一样。将数据放在某个单元格中，选择该单元格，然后运行此宏：

Sub Xtractor()
    Dim t As String, i As Long, j As Long
    Dim CH As String
    t = ActiveCell.Text
    j = 1
    If InStr(t, " ") = 0 Then Exit Sub

    ary = Split(t, " ")
    For Each a In ary
        For i = 1 To Len(a)
            CH = Mid(a, i, 1)
            If CH Like "[0-9A-Z]" Then
                ActiveCell.Offset(j, 1).Value = a
                j = j + 1
                Exit For
            End If
        Next i
    Next a
End Sub

它将在右侧的列中创建列表：

在此处输入图片描述

宏的安装和使用非常容易：

  1. ALT-F11 打开 VBE 窗口
  2. ALT-I ALT-M 打开新模块
  3. 粘贴内容并关闭 VBE 窗口

如果您保存工作簿，宏将随之保存。如果您使用的是 2003 以后的 Excel 版本，则必须将文件保存为 .xlsm 而不是 .xlsx

要删除宏：

  1. 调出如上所示的 VBE 窗口
  2. 清除代码
  3. 关闭 VBE 窗口

要使用 Excel 中的宏：

  1. ALT-F8
  2. 选择宏
  3. 触摸运行

要了解有关宏的更多信息，请参阅：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

必须启用宏才能使其工作！

相关内容