excel中,如果我要取某个特定两字符之间的字段怎么做

2023-08-11 16:20

2023-08-11 18:09

如果晌饥氏是比较有规律的,楼主可以使用VBA程序进行处理,几行代码就搞定,方便快捷。

(一)程序代码如下:

Sub Mid_m()
Dim m1, m2, m3
On Error Resume Next

Set mysheet1 = ThisWorkbook.Worksheets("Sheet1")

For m1 = 2 To 1000
 If mysheet1.Cells(m1, 1) <> "" Then
  m2 = InStr(1, mysheet1.Cells(m1, 1), "区")    '判断字符所在的位置
  
  m3 = InStr(1, mysheet1.Cells(m1, 1), "单元")
  
  mysheet1.Cells(m1, 2) = Mid(mysheet1.Cells(m1, 1), m2 + 1, m3 - m2 - 1)  '截取数字
  
  mysheet1.Cells(m1, 3) = Mid(mysheet1.Cells(m1, 1), m3 + 宴散2, _
  Len(mysheet1.Cells(m1, 1)) - m3 - 2)
  
 End If
Next

End Sub

(肢知二)程序运行后的结果如下:

更多回答

Ctrl+E,快速填充,先在单元格内输入一凳铅个正伏链确的单元,全选,Ctrl+E向下填充即可,见动图,如果不想要文字的话可以批量替换枣厅好掉,有不明白的可以追问。

热门问答