Select column and change values

[dacast]

Hi I have a code but is not working as expected.

the purpose is for the user be able to select a column, the VBA will look for a specific value and change to the custom one.
thank you for your help!

Sub find_and_replace()

Dim find_value, replace_value As String
Dim MySelection As Range
    
    On Error Resume Next
    Set MySelection = Application.InputBox("Select the column", Type:=8)
    If MySelection Is Nothing Then Exit Sub 'user canceled
    On Error GoTo 0

    find_value = "missing"
    replace_value = InputBox("Please Enter the New Value")

    MySelection.Replace What:=find_value, _
    Replacement:=replace_value, _
    LookAt:=xlPart, _
    SearchOrder:=xlByRows, _
    MatchCase:=False, _
    SearchFormat:=False, _
    ReplaceFormat:=False

End Sub

 

[James006]

Hi,

Have you tested to select Column and hit Control + H ...

 

[dacast]

Hi,

Have you tested to select Column and hit Control + H ...

This code will be incorporated into a bigger one; this is only an isolated test , thank yo for your input