提取全部的时间段

数论

=MID($A1,FIND("|",SUBSTITUTE($A1,"-","|",COLUMN(A1)))-7,15)
右拉即可

雨夜的星

雨夜的星 发表于 2022-8-19 19:36
根据   A1单元格   得到C1\D1\E1\F1等单元格的值，用函数，不用VBA。

感谢各位大神的指教。。。

雨夜的星

数论 发表于 2022-8-19 23:07
=MID($A1,FIND("|",SUBSTITUTE($A1,"-","|",COLUMN(A1)))-7,15)
右拉即可

非常感谢

INaga2018

雨夜的星 发表于 2022-8-19 19:36
根据   A1单元格   得到C1\D1\E1\F1等单元格的值，用函数，不用VBA。

数组，右拉

1. =LEFT(TRIM(MID(SUBSTITUTE($A$1,CHAR(10),REPT(" ",499)),COLUMN(A1)*499-498,499)),15)

复制代码

ericxzhou

1. Sub test()
   
2.     Dim mobj, j%
   
3.     With CreateObject("vbscript.regexp")
   
4.         .Global = True
   
5.         .Pattern = "[0-9]{4}\.[0-9]{2}-[0-9]{4}\.[0-9]{2}"
   
6.         For Each mobj In .Execute([a1].Value)
   
7.             Cells(1, j + 3) = mobj.Value
   
8.             j = j + 1
   
9.         Next
   
10.     End With
    
11. End Sub

复制代码