excel-仅在不存在其他文本时替换特定列的单元格中的一段文本

我试图用替换am，但只在文本中任何地方都不包含PM的单元格中。

例如，一些单元格可能是：周六上午9:00–11:30

其他单元格为：周三上午10:00–下午1:00

我的代码是：

    Dim find_value, replace_value As String

find_value = " AM–"
replace_value = "–"

    Columns("I").Replace What:=find_value, _
                            Replacement:=replace_value, _
                            LookAt:=xlPart, _
                            SearchOrder:=xlByRows, _
                            MatchCase:=True, _
                            SearchFormat:=False, _
                            ReplaceFormat:=False

这将替换所有实例，但我只想替换AM–如果PM不存在。