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

Question

I have an excel export with a column containing staff previous training sessions in a string. Example: First Name|Last Name|Training title|January 2018 to February 2018

Due to non obligatory form fields from which data was collected, many strings have no end month value, like this January 2018 to I'm trying to find a formula to find all strings ending with to (hence followed by nothing else) and delete this orphaned part of the string so it will look like January 2018 .

Find and replace is useless as it also replaces the value when there's an end month/year. Substitute seems like a good way to go but I've failed trying to find the proper structure to the formula.

Answer 1

测试它是否在结束to右，如果是这样，然后用左忽略它：

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

Answer 2

This is with VBA. Dont forget to check for extra spaces at the end. if there are any use 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