Excel查找单元格中的宽度高度深度

我试图让自己成为一个可以自动查找值的excel函数。但是我现在一无所有就被卡住了。文字是这样的，但总是不一样的长度和结构。Excel查找单元格中的宽度高度深度

电压：12-36V 功率：12W 夜光：800流明 IP等级：IP67 尺寸：宽度72，高度98毫米，深度41毫米 LED：4x3W

我需要从A1出口至B1数字宽度（也可以是72毫米或72），C1高度等。但我坚持使用的功能。

谁能帮我？

2016-12-02 Davis Cibuls

你尝试过什么吗？发布一个公式？ –

堆栈溢出不是一个代码写入服务，它预计你试图自己编码。我建议你对你的问题做一些研究（尝试上面的搜索框），并尝试自己编写一些代码。如果/当您遇到任何与您的代码有关的问题时，请再次提问并解释您所尝试的内容，以及为什么它不适合您。最重要的是包括[最小，完整和可验证示例]（http://stackoverflow.com/help/mcve）。 –

的功能。如果你只是想要一个公式试试这个：

=MID(A1,FIND("Width ",A1,1)+LEN("Width "),FIND(",",A1,FIND("Width ",A1,1))-FIND("Width ",A1,1)-LEN("Width "))

的术语“宽度”的公式搜索和提取的所有字符，直到下一个 ”，” 。

来源

2016-12-02 12:24:26

谢谢！这很好！ –

UDF。

打开VBA编辑器（ALT + F11）。
插入 - >模块

复制粘贴以下代码：

Function Regex(Cell, Search) 
    Dim RE As Object 

    Set RE = CreateObject("vbscript.regexp") 

    RE.Pattern = "(" & Search & " \d+?\w+)" 
    RE.Global = True 
    RE.IgnoreCase = True 
    Set Matches = RE.Execute(Cell) 

    If Matches.Count <> 0 Then 
     Regex = Matches.Item(0).submatches.Item(0) 
    End If 

End Function

保存工作簿作为macroactivated工作簿。

使用像=Regex(A1,"height")

来源

2016-12-02 12:22:15 Andreas

Excel查找单元格中的宽度高度深度

回答

相关问题