如何提取一段文本中的数值 并根据单位及时换算

会飞的兔子J

按照项目名称，提取里面这个项目的规模大小。
问题点：
1、单位有时候用kwp（以及其大小写），有时候是千瓦，千瓦时，但都是一样的概念。
2.单位有时候是MW，MWP 以及其大小写，这时候输出的结果要*1000，换算一下。
用EXCEL  Ctrl +E 可以自动填充大部分，但是还是要手工调整。M函数，我也在研究，应该要用正则表达式吗？ 测试 提取文本.zip (11.21 KB, 下载次数: 27)

2022-11-29 11:49 上传

点击文件名下载附件
提取文本

bjzzxhzl

函数公式：

1. =LET(a,-LOOKUP(,-SEARCH({"kw","千瓦","mw"},A2)),b,-LOOKUP(,-MID(A2,a-ROW($1:$10),ROW($1:$10))),IFNA(IF(ISNUMBER(SEARCH("M",A2)),b*1000,b),""))

复制代码

PQ公式：

1. = Table.AddColumn(源,"规模(kw)",each let a=Number.From(Text.Select(Text.AfterDelimiter([项目名称],"号",{0,RelativePosition.FromEnd}),{"0".."9","."})) in if Text.Contains([项目名称],"M") then a*1000 else a)

复制代码

比翼双飞880717

用PQ做的，但有瑕疵，比如要替换数字的“*号”，这个没有通用性，请高手修改

渡渡orz

bjzzxhzl

函数解：

1. =LET(a,-LOOKUP(,-SEARCH({"kw","千瓦","mw"},A2)),b,-LOOKUP(,-MID(A2,a-ROW($1:$10),ROW($1:$10))),IFNA(IF(ISNUMBER(SEARCH("M",A2)),b*1000,b),""))

复制代码

PQ换了一个新的写法：

1. = Table.AddColumn(源,"规模(kw)",each let a=Number.From(Text.Select(Text.AfterDelimiter([项目名称],"号",{0,RelativePosition.FromEnd}),{"0".."9","."})) in if Text.Contains([项目名称],"M") then a*1000 else a)

复制代码

ladeng6666

渡渡orz 发表于 2022-11-29 14:45

渡渡大佬太给力了！
把渡渡的代码，翻译了一下。

ladeng6666

把渡渡大佬的代码，翻译了一下

ladeng6666

把渡渡大佬的代码，翻译了一下

justdoit2003

B2输入下面公式：

1. =IF(ISNUMBER(FIND("M",CONCAT(IF((ISNUMBER(--MID(A2,ROW(A$1:$A$50),1))+(MID(A2,ROW(A$1:$A$50),1)=".")+(MID(A2,ROW(A$1:$A$50),1)="M")),MID(A2,ROW(A$1:$A$50),1),"")))),LEFT(CONCAT(IF((ISNUMBER(--MID(A2,ROW(A$1:$A$50),1))+(MID(A2,ROW(A$1:$A$50),1)=".")+(MID(A2,ROW(A$1:$A$50),1)="M")),MID(A2,ROW(A$1:$A$50),1),"")),LEN(CONCAT(IF((ISNUMBER(--MID(A2,ROW(A$1:$A$50),1))+(MID(A2,ROW(A$1:$A$50),1)=".")+(MID(A2,ROW(A$1:$A$50),1)="M")),MID(A2,ROW(A$1:$A$50),1),"")))-1)*1000,CONCAT(IF((ISNUMBER(--MID(A2,ROW(A$1:$A$50),1))+(MID(A2,ROW(A$1:$A$50),1)=".")+(MID(A2,ROW(A$1:$A$50),1)="M")),MID(A2,ROW(A$1:$A$50),1),""))*1)

复制代码

数组公式，下拉

hbzql

let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    提取 = Table.AddColumn(源, "规模（kwp）", each   Web.Page("<script>document.write( '"&[项目名称]&"'.match(/\d+\.*\d*[kKmM千]/gi))</script>")[Data]{0}[Children]{0}[Children]{1}[Text]{0}),
    转换 = Table.TransformColumns(提取,{"规模（kwp）",each if Text.Contains(_,"M") then Number.From(Text.Remove(_,{"k","K","m","M","千"}))*1000 else Number.From(Text.Remove(_,{"k","K","m","M","千"}))})
in
    转换

PQ  正则表达式