文字提取数字公式，请教？

壹号公馆

为了方便查找数据，需要将商品名称的数据提取出来，求教？

tchh666

1. =-LOOKUP(,-MID(A1,MIN(FIND(ROW($1:$9),A1&1/17)),ROW($1:$9)))

复制代码

满坛皆为吾师

B1下拉

1. =-LOOKUP(,-MID(A1,MIN(FIND(ROW($1:$9),A1&6^66)),ROW($1:$9)))

复制代码

都一样么- - 我补一条

1. =LOOKUP(,-FIND(ROW($1:$99999)%,A1),ROW($1:$99999)%)

复制代码

冬不暖

1. =AGGREGATE(14,6,--MID(A1,ROW($1:$33),COLUMN(A:G)),1)

复制代码

=-LOOKUP(,-MID(A1,MIN(FIND(ROW($1:$9),A1&56^7)),ROW($1:$10)))

quqiyuan

=-AGGREGATE(15,2,(-MID("a"&A1,ROW($1:$99),COLUMN($A:$J))),ROW($A$1))

静听溪流

=MAX(TEXT(MID(A1,ROW($1:$99),COLUMN(A:Z)),"G/通用格式;;0;!0")/1)

安若浅笑

=-LOOKUP(9^9,-MIDB(A1,MIN(FINDB(LEFT(ROW($1:$18)-2,1),A1&-1/19)),ROW($1:$100)))三键

满坛皆为吾师

补一发

1. =MATCH(9,FIND(ROW($1:$99999)%,A1)^0)%

复制代码

ericxzhou

1. Sub test()
   
2.     Dim i%, arr
   
3.     With CreateObject("vbscript.regexp")
   
4.         .Pattern = "\d+(\.\d+)?"
   
5.         .Global = True
   
6.         arr = [a1].CurrentRegion
   
7.         For i = 1 To UBound(arr)
   
8.             arr(i, 2) = .Execute(arr(i, 1))(0).Value
   
9.         Next
   
10.     End With
    
11.     [a1].Resize(UBound(arr), UBound(arr, 2)) = arr
    
12. End Sub

复制代码