excel - Excel：有没有办法替换单元格字符串的特殊部分？

Question

我有一个 excel 导出，其中包含一个字符串，其中包含员工以前的培训课程。例子： First Name|Last Name|Training title|January 2018 to February 2018

由于从中收集数据的非强制性表单字段，许多字符串没有结束月份值，像这样January 2018 to 我试图找到一个公式来查找所有以结尾的字符串to（因此后面没有其他内容）并删除这个孤立的部分字符串，所以它看起来像January 2018.

查找和替换是无用的，因为它还会在结束月份/年份时替换值。替代似乎是一个不错的方法，但我未能尝试找到公式的正确结构。

Answer 1

测试它是否to以 right 结尾，如果是，则使用 left 省略它：

=IF(RIGHT(A1,2) = "to",LEFT(A1,LEN(A1)-2),A1)

Answer 2

这与 VBA 一起使用。不要忘记检查最后是否有多余的空格。如果有任何使用TRIM。

Option Explicit

Sub Remove()

    Dim Lastrow As Long, i As Long

    'Change Sheet if needed
    With ThisWorkbook.Worksheets("Sheet1")

        Lastrow = .Cells(.Rows.Count, "A").End(xlUp).Row

        For i = 1 To Lastrow

            If Right(.Range("A" & i).Value, 2) = "to" Then
                .Range("A" & i).Value = Left(.Range("A" & i).Value, Len(.Range("A" & i).Value) - 3)
            End If
        Next i


    End With

End Sub