Hello All,
I want to move any cells that contain the word Total in Column A to Columb
B. I have a macro, but I have to have the exact name. Example of the code:

ElseIf .Cells(lRow, "A").Value = "01 Total" Then
.Cells(lRow, "A").Value = ""
.Cells(lRow, "A").Offset(0, 1).Value = "01 Total"
ElseIf .Cells(lRow, "A").Value = "02 Total" Then
.Cells(lRow, "A").Value = ""
.Cells(lRow, "A").Offset(0, 1).Value = "02 Total"

So want to just have the word Total in the code and it will move those cells.

So would appreciate any help.

Thanks,

J