offset from first coulmn

Hello

I came across this script, which I've modified
It searches for a specified name from "A1", within the range "Outline_07"
and offsets an "X" mark 13 cells to the right, of where it appears in that row.

It works great.

But is it possible to modify this such that it no longer offsets the "X" mark from where the name appears in the row, but rather places the "X" mark always in Column 10.

Tried countless variations but cant get it to work!...
Thanks for any help.

Sub FindText_PlaceX()
    Dim Rng As Range
    Dim str As String
    Application.ScreenUpdating = False
    Set Rng = Range("Outline_07")
    str = Range("A1").Value
    If str = "" Then Exit Sub
    For i = 1 To Rng.Rows.Count
        If Rng.Cells(i).Value Like "*" & str & "*" Then
            Rng.Cells(i).Offset(0, 13) = "X"
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

Re: offset from first coulmn

Thanks for the replies.

Pike, thanks for the code, but still offsets the x value to the right of the word itself.

Smallman, Thanks! I've uploaded a sample file of what im trying to achieve. there are two sheets: a before and after result, if that makes sense.

The code searches for the text in A1 "time" from a named range "Outline_07", then offsets an "x" mark 4 columns from the left, if it appears.

Thanks for the help.
Jeff

Re: offset from first coulmn

Hello, Pike

Thank you very much. Works Great!!

Cheers!

Jeff

Re: offset from first coulmn

Thanks, Smallman!

Good to know!