如何从文本字符串在Excel中使用VBA中提取第N个字
在本文中，您将学习如何从文本字符串中提取第n个单词。我们将使用VBA代码创建UDF以查找字符串中的第n个单词。
我们需要执行以下步骤：
单击“开发人员”选项卡。从“代码”组中，选择“ Visual Basic”
-
单击插入，然后单击模块
-
这将创建新的模块。
在模块
中输入以下代码===函数ExtractNthWord（x作为字符串，y作为整数）
昏暗的word（）作为字符串
昏暗wordCount只要
单词= VBA.Split（x，“”）
wordCount = UBound（word）
如果wordCount <1或（y-1）> wordCount Or y <0，则
ExtractNthWord =“”
其他
ExtractNthWord =单词（y-1）
如果
结束
结束函数
使用名称ExtractNthWord创建新的UDF公式。有两个参数。第一个是需要从中提取数据的查找单元格，第二个是第n个数字。
以下是数据的快照：
-
要从A列中检索2 ^ nd ^个单词，公式将为
= ExtractNthWord（A2,2）
-
同样，要提取3 ^ rd ^单词，公式将为
= ExtractNthWord（A2,3）
-
我们可以使用辅助单元格来存储第二个参数的值；这将使我们更快地看到结果。
-
在这里，辅助单元格为D1，其中我们可以输入要作为输出看到的第n个单词。
现在，我们只需要更改单元格D1中的数字，结果就会相应地自动更改。