vba拆分F列内容,按空格,和左斜杆拆分,只保留第一个,其他都不要
时间: 2024-05-16 22:12:01 浏览: 115
你好,对于你的问题,我可以提供以下VBA代码:
```
Sub SplitFContent()
Dim lastRow As Long
lastRow = Range("F" & Rows.count).End(xlUp).Row
Dim cellValue As String
Dim splitValue As Variant
Dim i As Integer
For i = 1 To lastRow
cellValue = Cells(i, 6).Value
splitValue = Split(cellValue, " ")
splitValue = Split(splitValue(0), "/")
Cells(i, 6).Value = splitValue(0)
Next i
End Sub
```
这段代码可以将F列的每一个单元格按空格和左斜杆分割,只保留第一个部分,其余部分将会被忽略。希望对你有帮助!